/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_gettext.idb / usr / freeware / share / emacs / site-lisp / po-mode.elc.z / po-mode.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 64 72 6b 40 6f 72 63 |piled by| drk@orc|
|00000020| 68 69 65 74 74 61 2e 62 | 6f 73 74 6f 6e 2e 73 67 |hietta.b|oston.sg|
|00000030| 69 2e 63 6f 6d 20 6f 6e | 20 54 75 65 20 4d 61 72 |i.com on| Tue Mar|
|00000040| 20 20 39 20 31 37 3a 33 | 35 3a 33 38 20 31 39 39 |  9 17:3|5:38 199|
|00000050| 39 0a 3b 3b 3b 20 66 72 | 6f 6d 20 66 69 6c 65 20 |9.;;; fr|om file |
|00000060| 2f 75 73 72 2f 70 65 6f | 70 6c 65 2f 64 72 6b 2f |/usr/peo|ple/drk/|
|00000070| 73 61 6e 64 62 6f 78 2f | 66 77 2f 67 65 74 74 65 |sandbox/|fw/gette|
|00000080| 78 74 2f 30 2e 31 30 2f | 67 65 74 74 65 78 74 2d |xt/0.10/|gettext-|
|00000090| 30 2e 31 30 2e 64 69 66 | 66 62 75 69 6c 64 2f 6d |0.10.dif|fbuild/m|
|000000a0| 69 73 63 2f 65 6c 63 2e | 32 34 33 34 36 34 2f 70 |isc/elc.|243464/p|
|000000b0| 6f 2d 6d 6f 64 65 2e 65 | 6c 0a 3b 3b 3b 20 65 6d |o-mode.e|l.;;; em|
|000000c0| 61 63 73 20 76 65 72 73 | 69 6f 6e 20 31 39 2e 33 |acs vers|ion 19.3|
|000000d0| 34 2e 31 2e 0a 3b 3b 3b | 20 62 79 74 65 63 6f 6d |4.1..;;;| bytecom|
|000000e0| 70 20 76 65 72 73 69 6f | 6e 20 46 53 46 20 32 2e |p versio|n FSF 2.|
|000000f0| 31 30 0a 3b 3b 3b 20 6f | 70 74 69 6d 69 7a 61 74 |10.;;; o|ptimizat|
|00000100| 69 6f 6e 20 69 73 20 6f | 6e 2e 0a 3b 3b 3b 20 74 |ion is o|n..;;; t|
|00000110| 68 69 73 20 66 69 6c 65 | 20 75 73 65 73 20 6f 70 |his file| uses op|
|00000120| 63 6f 64 65 73 20 77 68 | 69 63 68 20 64 6f 20 6e |codes wh|ich do n|
|00000130| 6f 74 20 65 78 69 73 74 | 20 69 6e 20 45 6d 61 63 |ot exist| in Emac|
|00000140| 73 20 31 38 2e 0a 0a 28 | 69 66 20 28 61 6e 64 20 |s 18...(|if (and |
|00000150| 28 62 6f 75 6e 64 70 20 | 27 65 6d 61 63 73 2d 76 |(boundp |'emacs-v|
|00000160| 65 72 73 69 6f 6e 29 0a | 09 20 28 6f 72 20 28 61 |ersion).|. (or (a|
|00000170| 6e 64 20 28 62 6f 75 6e | 64 70 20 27 65 70 6f 63 |nd (boun|dp 'epoc|
|00000180| 68 3a 3a 76 65 72 73 69 | 6f 6e 29 20 65 70 6f 63 |h::versi|on) epoc|
|00000190| 68 3a 3a 76 65 72 73 69 | 6f 6e 29 0a 09 20 20 20 |h::versi|on)..   |
|000001a0| 20 20 28 73 74 72 69 6e | 67 2d 6c 65 73 73 70 20 |  (strin|g-lessp |
|000001b0| 65 6d 61 63 73 2d 76 65 | 72 73 69 6f 6e 20 22 31 |emacs-ve|rsion "1|
|000001c0| 39 2e 32 39 22 29 29 29 | 0a 20 20 20 20 28 65 72 |9.29")))|.    (er|
|000001d0| 72 6f 72 20 22 60 70 6f | 2d 6d 6f 64 65 2e 65 6c |ror "`po|-mode.el|
|000001e0| 27 20 77 61 73 20 63 6f | 6d 70 69 6c 65 64 20 66 |' was co|mpiled f|
|000001f0| 6f 72 20 45 6d 61 63 73 | 20 31 39 2e 32 39 20 6f |or Emacs| 19.29 o|
|00000200| 72 20 6c 61 74 65 72 22 | 29 29 0a 0a 0a 23 40 32 |r later"|))...#@2|
|00000210| 39 20 53 68 6f 77 20 45 | 6d 61 63 73 20 50 4f 20 |9 Show E|macs PO |
|00000220| 6d 6f 64 65 20 76 65 72 | 73 69 6f 6e 2e 1f 0a 28 |mode ver|sion...(|
|00000230| 64 65 66 61 6c 69 61 73 | 20 27 70 6f 2d 6d 6f 64 |defalias| 'po-mod|
|00000240| 65 2d 76 65 72 73 69 6f | 6e 20 23 5b 6e 69 6c 20 |e-versio|n #[nil |
|00000250| 22 c0 c1 c2 c3 c4 4f 5c | 22 87 22 20 5b 6d 65 73 |".....O\|"." [mes|
|00000260| 73 61 67 65 20 22 45 6d | 61 63 73 20 50 4f 20 6d |sage "Em|acs PO m|
|00000270| 6f 64 65 2c 20 76 65 72 | 73 69 6f 6e 20 25 73 22 |ode, ver|sion %s"|
|00000280| 20 22 24 52 65 76 69 73 | 69 6f 6e 3a 20 31 2e 31 | "$Revis|ion: 1.1|
|00000290| 38 20 24 22 20 31 31 20 | 2d 32 5d 20 35 20 28 23 |8 $" 11 |-2] 5 (#|
|000002a0| 24 20 2e 20 35 33 30 29 | 20 6e 69 6c 5d 29 0a 28 |$ . 530)| nil]).(|
|000002b0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 21 84 08 |byte-cod|e "..!..|
|000002c0| 00 c2 11 c1 0b 42 13 c0 | 87 22 20 5b 62 6f 75 6e |.....B..|." [boun|
|000002d0| 64 70 20 70 6f 2d 68 65 | 6c 70 2d 64 69 73 70 6c |dp po-he|lp-displ|
|000002e0| 61 79 2d 73 74 72 69 6e | 67 20 22 20 20 20 20 20 |ay-strin|g "     |
|000002f0| 20 20 20 20 20 20 53 75 | 6d 6d 61 72 79 20 6f 66 |      Su|mmary of|
|00000300| 20 50 4f 20 6d 6f 64 65 | 20 43 6f 6d 6d 61 6e 64 | PO mode| Command|
|00000310| 73 20 20 20 20 28 2a 20 | 6d 65 61 6e 73 20 79 65 |s    (* |means ye|
|00000320| 74 20 74 6f 20 63 6f 6d | 65 29 5c 6e 5c 6e 41 6e |t to com|e)\n\nAn|
|00000330| 79 20 54 79 70 65 20 6f | 66 20 45 6e 74 72 79 20 |y Type o|f Entry |
|00000340| 20 20 20 20 20 20 20 4f | 62 73 6f 6c 65 74 65 20 |       O|bsolete |
|00000350| 45 6e 74 72 69 65 73 20 | 20 20 20 20 20 20 20 20 |Entries |        |
|00000360| 20 20 20 55 6e 74 72 61 | 6e 73 6c 61 74 65 64 20 |   Untra|nslated |
|00000370| 45 6e 74 72 69 65 73 5c | 6e 6e 2c 20 53 50 43 20 |Entries\|nn, SPC |
|00000380| 20 20 46 69 6e 64 20 6e | 65 78 74 20 20 20 20 20 |  Find n|ext     |
|00000390| 20 20 4d 2d 6e 2c 20 4d | 2d 53 50 43 20 20 46 69 |  M-n, M|-SPC  Fi|
|000003a0| 6e 64 20 6e 65 78 74 20 | 20 20 20 20 20 20 65 20 |nd next |      e |
|000003b0| 20 20 20 46 69 6e 64 20 | 6e 65 78 74 5c 6e 70 2c |   Find |next\np,|
|000003c0| 20 44 45 4c 20 20 20 46 | 69 6e 64 20 70 72 65 76 | DEL   F|ind prev|
|000003d0| 69 6f 75 73 20 20 20 4d | 2d 70 2c 20 4d 2d 44 45 |ious   M|-p, M-DE|
|000003e0| 4c 20 20 46 69 6e 64 20 | 70 72 65 76 69 6f 75 73 |L  Find |previous|
|000003f0| 20 20 20 4d 2d 65 20 20 | 46 69 6e 64 20 70 72 65 |   M-e  |Find pre|
|00000400| 76 69 6f 75 73 5c 6e 2e | 20 20 20 20 20 20 20 20 |vious\n.|        |
|00000410| 52 65 64 69 73 70 6c 61 | 79 20 20 20 20 20 20 20 |Redispla|y       |
|00000420| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000430| 20 20 20 20 20 20 20 20 | 20 20 20 20 54 41 42 20 |        |    TAB |
|00000440| 20 49 6e 69 74 20 66 72 | 6f 6d 20 6d 73 67 69 64 | Init fr|om msgid|
|00000450| 5c 6e 3c 20 20 20 20 20 | 20 20 20 46 69 72 73 74 |\n<     |   First|
|00000460| 20 20 20 20 20 20 20 71 | 20 20 20 20 20 71 75 69 |       q|     qui|
|00000470| 74 20 20 20 20 20 20 20 | 20 20 20 20 75 20 20 75 |t       |    u  u|
|00000480| 6e 64 6f 5c 6e 3e 20 20 | 20 20 20 20 20 20 4c 61 |ndo\n>  |      La|
|00000490| 73 74 20 20 20 20 20 20 | 20 20 6f 20 20 20 20 20 |st      |  o     |
|000004a0| 6f 74 68 65 72 20 77 69 | 6e 64 6f 77 20 20 20 3d |other wi|ndow   =|
|000004b0| 20 20 70 6f 73 69 74 69 | 6f 6e 20 20 20 2a 73 20 |  positi|on   *s |
|000004c0| 20 20 20 54 6f 20 63 6f | 6d 70 65 6e 64 69 75 6d |   To co|mpendium|
|000004d0| 5c 6e 7a 20 20 20 20 20 | 20 20 20 46 61 64 65 20 |\nz     |   Fade |
|000004e0| 6f 75 74 20 20 20 20 68 | 2c 20 3f 20 20 68 65 6c |out    h|, ?  hel|
|000004f0| 70 20 20 20 20 20 20 20 | 20 20 20 20 76 20 20 76 |p       |    v  v|
|00000500| 61 6c 69 64 61 74 65 20 | 20 20 2a 4d 2d 73 20 20 |alidate |  *M-s  |
|00000510| 53 65 6c 65 63 74 2c 20 | 73 61 76 65 5c 6e 20 20 |Select, |save\n  |
|00000520| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000530| 20 20 20 56 20 20 20 20 | 20 76 65 72 73 69 6f 6e |   V    | version|
|00000540| 20 69 6e 66 6f 5c 6e 49 | 6e 65 78 61 63 74 20 65 | info\nI|nexact e|
|00000550| 6e 74 72 69 65 73 5c 6e | 49 20 20 20 20 20 46 69 |ntries\n|I     Fi|
|00000560| 6e 64 20 6e 65 78 74 20 | 20 20 20 20 20 20 54 72 |nd next |      Tr|
|00000570| 61 6e 73 6c 61 74 69 6f | 6e 73 20 20 20 20 20 20 |anslatio|ns      |
|00000580| 20 20 20 20 20 54 72 61 | 6e 73 6c 61 74 6f 72 20 |     Tra|nslator |
|00000590| 43 6f 6d 6d 65 6e 74 73 | 5c 6e 4d 2d 49 20 20 20 |Comments|\nM-I   |
|000005a0| 46 69 6e 64 20 70 72 65 | 76 69 6f 75 73 20 20 20 |Find pre|vious   |
|000005b0| 52 45 54 20 20 20 43 61 | 6c 6c 20 65 64 69 74 6f |RET   Ca|ll edito|
|000005c0| 72 20 20 20 20 20 20 4d | 2d 52 45 54 2c 20 23 20 |r      M|-RET, # |
|000005d0| 20 43 61 6c 6c 20 65 64 | 69 74 6f 72 5c 6e 3f 3f | Call ed|itor\n??|
|000005e0| 3f 20 20 20 52 65 6d 6f | 76 65 20 77 61 72 6e 69 |?   Remo|ve warni|
|000005f0| 6e 67 20 20 6b 20 20 20 | 20 20 4b 69 6c 6c 20 74 |ng  k   |  Kill t|
|00000600| 6f 20 72 69 6e 67 20 20 | 20 20 20 4d 2d 6b 20 20 |o ring  |   M-k  |
|00000610| 20 20 20 20 20 4b 69 6c | 6c 20 74 6f 20 72 69 6e |     Kil|l to rin|
|00000620| 67 5c 6e 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |g\n     |        |
|00000630| 20 20 20 20 20 20 20 20 | 20 77 20 20 20 20 20 43 |        | w     C|
|00000640| 6f 70 79 20 74 6f 20 72 | 69 6e 67 20 20 20 20 20 |opy to r|ing     |
|00000650| 4d 2d 77 20 20 20 20 20 | 20 20 43 6f 70 79 20 74 |M-w     |  Copy t|
|00000660| 6f 20 72 69 6e 67 5c 6e | 20 20 50 6f 73 69 74 69 |o ring\n|  Positi|
|00000670| 6f 6e 20 53 74 61 63 6b | 20 20 20 20 20 20 79 20 |on Stack|      y |
|00000680| 20 20 20 20 59 61 6e 6b | 20 66 72 6f 6d 20 72 69 |    Yank| from ri|
|00000690| 6e 67 20 20 20 4d 2d 79 | 20 20 20 20 20 20 20 59 |ng   M-y|       Y|
|000006a0| 61 6e 6b 20 66 72 6f 6d | 20 72 69 6e 67 5c 6e 20 |ank from| ring\n |
|000006b0| 20 6d 20 20 50 75 73 68 | 20 63 75 72 72 65 6e 74 | m  Push| current|
|000006c0| 5c 6e 20 20 6c 20 20 50 | 6f 70 20 61 6e 64 20 72 |\n  l  P|op and r|
|000006d0| 65 74 75 72 6e 20 20 20 | 20 20 20 20 20 20 20 20 |eturn   |        |
|000006e0| 20 50 72 6f 67 72 61 6d | 20 53 6f 75 72 63 65 73 | Program| Sources|
|000006f0| 20 20 20 20 20 20 20 20 | 20 41 75 78 69 6c 69 61 |        | Auxilia|
|00000700| 72 79 20 46 69 6c 65 73 | 5c 6e 20 20 78 20 20 45 |ry Files|\n  x  E|
|00000710| 78 63 68 61 6e 67 65 20 | 74 6f 70 20 20 20 20 20 |xchange |top     |
|00000720| 20 20 20 20 20 20 63 20 | 20 20 20 43 79 63 6c 65 |      c |   Cycle|
|00000730| 20 72 65 66 65 72 65 6e | 63 65 20 20 20 20 2a 61 | referen|ce    *a|
|00000740| 20 20 20 20 43 79 63 6c | 65 20 66 69 6c 65 5c 6e |    Cycl|e file\n|
|00000750| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000760| 20 20 20 20 20 20 20 20 | 20 20 20 20 4d 2d 63 20 |        |    M-c |
|00000770| 20 53 65 6c 65 63 74 20 | 72 65 66 65 72 65 6e 63 | Select |referenc|
|00000780| 65 20 20 20 2a 4d 2d 61 | 20 20 53 65 6c 65 63 74 |e   *M-a|  Select|
|00000790| 20 66 69 6c 65 5c 6e 20 | 20 67 65 74 74 65 78 74 | file\n | gettext|
|000007a0| 20 4b 65 79 77 6f 72 64 | 20 4d 61 72 6b 69 6e 67 | Keyword| Marking|
|000007b0| 20 20 20 64 20 20 20 20 | 41 64 64 20 74 6f 20 70 |   d    |Add to p|
|000007c0| 61 74 68 20 20 20 20 20 | 20 20 20 2a 66 20 20 20 |ath     |   *f   |
|000007d0| 20 41 64 64 20 66 69 6c | 65 5c 6e 20 20 2c 20 20 | Add fil|e\n  ,  |
|000007e0| 20 20 46 69 6e 64 20 6e | 65 78 74 20 73 74 72 69 |  Find n|ext stri|
|000007f0| 6e 67 20 20 20 20 20 4d | 2d 64 20 20 44 65 6c 65 |ng     M|-d  Dele|
|00000800| 74 65 20 66 72 6f 6d 20 | 70 61 74 68 20 20 20 2a |te from |path   *|
|00000810| 4d 2d 66 20 20 44 65 6c | 65 74 65 20 66 69 6c 65 |M-f  Del|ete file|
|00000820| 5c 6e 20 20 4d 2d 2c 20 | 20 4d 61 72 6b 20 74 72 |\n  M-, | Mark tr|
|00000830| 61 6e 73 6c 61 74 61 62 | 6c 65 5c 6e 20 20 4d 2d |anslatab|le\n  M-|
|00000840| 2e 20 20 43 68 61 6e 67 | 65 20 6d 61 72 6b 2c 20 |.  Chang|e mark, |
|00000850| 6d 61 72 6b 5c 6e 22 20 | 63 75 72 72 65 6e 74 2d |mark\n" |current-|
|00000860| 6c 6f 61 64 2d 6c 69 73 | 74 5d 20 32 29 0a 23 40 |load-lis|t] 2).#@|
|00000870| 36 33 20 52 65 67 65 78 | 70 20 6d 61 74 63 68 69 |63 Regex|p matchi|
|00000880| 6e 67 20 61 20 77 68 6f | 6c 65 20 6d 73 67 69 64 |ng a who|le msgid|
|00000890| 20 66 69 65 6c 64 2c 20 | 77 68 65 74 68 65 72 20 | field, |whether |
|000008a0| 6f 62 73 6f 6c 65 74 65 | 20 6f 72 20 6e 6f 74 2e |obsolete| or not.|
|000008b0| 1f 0a 28 64 65 66 76 61 | 72 20 70 6f 2d 61 6e 79 |..(defva|r po-any|
|000008c0| 2d 6d 73 67 69 64 2d 72 | 65 67 65 78 70 20 22 5e |-msgid-r|egexp "^|
|000008d0| 5c 5c 28 23 5b 20 09 5d | 2a 5c 5c 29 3f 6d 73 67 |\\(#[ .]|*\\)?msg|
|000008e0| 69 64 2e 2a 5c 6e 5c 5c | 28 5c 5c 28 23 5b 20 09 |id.*\n\\|(\\(#[ .|
|000008f0| 5d 2a 5c 5c 29 3f 5c 22 | 2e 2a 5c 6e 5c 5c 29 2a |]*\\)?\"|.*\n\\)*|
|00000900| 22 20 28 23 24 20 2e 20 | 32 31 36 33 29 29 0a 23 |" (#$ . |2163)).#|
|00000910| 40 36 34 20 52 65 67 65 | 78 70 20 6d 61 74 63 68 |@64 Rege|xp match|
|00000920| 69 6e 67 20 61 20 77 68 | 6f 6c 65 20 6d 73 67 73 |ing a wh|ole msgs|
|00000930| 74 72 20 66 69 65 6c 64 | 2c 20 77 68 65 74 68 65 |tr field|, whethe|
|00000940| 72 20 6f 62 73 6f 6c 65 | 74 65 20 6f 72 20 6e 6f |r obsole|te or no|
|00000950| 74 2e 1f 0a 28 64 65 66 | 76 61 72 20 70 6f 2d 61 |t...(def|var po-a|
|00000960| 6e 79 2d 6d 73 67 73 74 | 72 2d 72 65 67 65 78 70 |ny-msgst|r-regexp|
|00000970| 20 22 5e 5c 5c 28 23 5b | 20 09 5d 2a 5c 5c 29 3f | "^\\(#[| .]*\\)?|
|00000980| 6d 73 67 73 74 72 2e 2a | 5c 6e 5c 5c 28 5c 5c 28 |msgstr.*|\n\\(\\(|
|00000990| 23 5b 20 09 5d 2a 5c 5c | 29 3f 5c 22 2e 2a 5c 6e |#[ .]*\\|)?\".*\n|
|000009a0| 5c 5c 29 2a 22 20 28 23 | 24 20 2e 20 32 33 32 34 |\\)*" (#|$ . 2324|
|000009b0| 29 29 0a 23 40 35 30 20 | 50 61 74 68 20 74 6f 20 |)).#@50 |Path to |
|000009c0| 6d 73 67 66 6d 74 20 70 | 72 6f 67 72 61 6d 20 66 |msgfmt p|rogram f|
|000009d0| 72 6f 6d 20 47 4e 55 20 | 67 65 74 74 65 78 74 20 |rom GNU |gettext |
|000009e0| 70 61 63 6b 61 67 65 2e | 1f 0a 28 64 65 66 76 61 |package.|..(defva|
|000009f0| 72 20 70 6f 2d 6d 73 67 | 66 6d 74 2d 70 72 6f 67 |r po-msg|fmt-prog|
|00000a00| 72 61 6d 20 22 6d 73 67 | 66 6d 74 22 20 28 23 24 |ram "msg|fmt" (#$|
|00000a10| 20 2e 20 32 34 38 38 29 | 29 0a 28 62 79 74 65 2d | . 2488)|).(byte-|
|00000a20| 63 6f 64 65 20 22 c0 c1 | 21 83 0b 00 c1 c2 c3 5c |code "..|!......\|
|00000a30| 22 88 c0 87 22 20 5b 66 | 62 6f 75 6e 64 70 20 68 |"..." [f|boundp h|
|00000a40| 69 6c 69 74 2d 73 65 74 | 2d 6d 6f 64 65 2d 70 61 |ilit-set|-mode-pa|
|00000a50| 74 74 65 72 6e 73 20 70 | 6f 2d 6d 6f 64 65 20 28 |tterns p|o-mode (|
|00000a60| 28 22 5e 23 2e 2a 24 22 | 20 6e 69 6c 20 63 6f 6d |("^#.*$"| nil com|
|00000a70| 6d 65 6e 74 29 20 28 22 | 5e 5c 5c 28 6d 73 67 69 |ment) ("|^\\(msgi|
|00000a80| 64 5c 5c 7c 6d 73 67 73 | 74 72 5c 5c 29 5c 5c 3e |d\\|msgs|tr\\)\\>|
|00000a90| 22 20 6e 69 6c 20 6b 65 | 79 77 6f 72 64 29 29 5d |" nil ke|yword))]|
|00000aa0| 20 33 29 0a 23 40 34 39 | 20 41 64 64 69 74 69 6f | 3).#@49| Additio|
|00000ab0| 6e 61 6c 20 65 78 70 72 | 65 73 73 69 6f 6e 73 20 |nal expr|essions |
|00000ac0| 74 6f 20 68 69 67 68 6c | 69 67 68 74 20 69 6e 20 |to highl|ight in |
|00000ad0| 70 6f 2d 6d 6f 64 65 2e | 1f 0a 28 64 65 66 63 6f |po-mode.|..(defco|
|00000ae0| 6e 73 74 20 70 6f 2d 66 | 6f 6e 74 2d 6c 6f 63 6b |nst po-f|ont-lock|
|00000af0| 2d 6b 65 79 77 6f 72 64 | 73 20 28 62 79 74 65 2d |-keyword|s (byte-|
|00000b00| 63 6f 64 65 20 22 c0 c1 | c2 c3 45 21 87 22 20 5b |code "..|..E!." [|
|00000b10| 70 75 72 65 63 6f 70 79 | 20 28 22 5e 23 2e 2a 24 |purecopy| ("^#.*$|
|00000b20| 22 20 2e 20 66 6f 6e 74 | 2d 6c 6f 63 6b 2d 63 6f |" . font|-lock-co|
|00000b30| 6d 6d 65 6e 74 2d 66 61 | 63 65 29 20 28 22 5e 23 |mment-fa|ce) ("^#|
|00000b40| 3a 5c 5c 28 2e 2a 5c 5c | 29 5c 5c 3e 22 20 31 20 |:\\(.*\\|)\\>" 1 |
|00000b50| 66 6f 6e 74 2d 6c 6f 63 | 6b 2d 66 75 6e 63 74 69 |font-loc|k-functi|
|00000b60| 6f 6e 2d 6e 61 6d 65 2d | 66 61 63 65 20 74 29 20 |on-name-|face t) |
|00000b70| 28 22 5e 5c 5c 28 6d 73 | 67 69 64 5c 5c 7c 6d 73 |("^\\(ms|gid\\|ms|
|00000b80| 67 73 74 72 5c 5c 29 5c | 5c 3e 22 20 2e 20 66 6f |gstr\\)\|\>" . fo|
|00000b90| 6e 74 2d 6c 6f 63 6b 2d | 6b 65 79 77 6f 72 64 2d |nt-lock-|keyword-|
|00000ba0| 66 61 63 65 29 5d 20 34 | 29 20 28 23 24 20 2e 20 |face)] 4|) (#$ . |
|00000bb0| 32 37 32 39 29 29 0a 28 | 62 79 74 65 2d 63 6f 64 |2729)).(|byte-cod|
|00000bc0| 65 20 22 c0 c1 21 83 5c | 66 00 c2 c3 c1 c4 23 88 |e "..!.\|f.....#.|
|00000bd0| c0 87 22 20 5b 62 6f 75 | 6e 64 70 20 66 6f 6e 74 |.." [bou|ndp font|
|00000be0| 2d 6c 6f 63 6b 2d 6b 65 | 79 77 6f 72 64 73 20 70 |-lock-ke|ywords p|
|00000bf0| 75 74 20 70 6f 2d 6d 6f | 64 65 20 70 6f 2d 66 6f |ut po-mo|de po-fo|
|00000c00| 6e 74 2d 6c 6f 63 6b 2d | 6b 65 79 77 6f 72 64 73 |nt-lock-|keywords|
|00000c10| 5d 20 34 29 0a 23 40 32 | 31 20 4b 65 79 6d 61 70 |] 4).#@2|1 Keymap|
|00000c20| 20 66 6f 72 20 50 4f 20 | 6d 6f 64 65 2e 1f 0a 28 | for PO |mode...(|
|00000c30| 64 65 66 76 61 72 20 70 | 6f 2d 6d 6f 64 65 2d 6d |defvar p|o-mode-m|
|00000c40| 61 70 20 6e 69 6c 20 28 | 23 24 20 2e 20 33 30 39 |ap nil (|#$ . 309|
|00000c50| 38 29 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |8)).(byt|e-code "|
|00000c60| 08 84 41 01 c1 20 10 c2 | 08 21 88 c3 08 c4 c5 23 |..A.. ..|.!.....#|
|00000c70| 88 c3 08 c6 c7 23 88 c3 | 08 c8 c9 23 88 c3 08 ca |.....#..|...#....|
|00000c80| cb 23 88 c3 08 cc cd 23 | 88 c3 08 ce cf 23 88 c3 |.#.....#|.....#..|
|00000c90| 08 d0 d1 23 88 c3 08 d2 | d3 23 88 c3 08 d4 d5 23 |...#....|.#.....#|
|00000ca0| 88 c3 08 d6 d7 23 88 c3 | 08 d8 d9 23 88 c3 08 da |.....#..|...#....|
|00000cb0| db 23 88 c3 08 dc dd 23 | 88 c3 08 de cb 23 88 c3 |.#.....#|.....#..|
|00000cc0| 08 df e0 23 88 c3 08 e1 | e2 23 88 c3 08 e3 e4 23 |...#....|.#.....#|
|00000cd0| 88 c3 08 e5 e6 23 88 c3 | 08 e7 c9 23 88 c3 08 e8 |.....#..|...#....|
|00000ce0| e9 23 88 c3 08 ea eb 23 | 88 c3 08 ec ed 23 88 c3 |.#.....#|.....#..|
|00000cf0| 08 ee ef 23 88 c3 08 f0 | f1 23 88 c3 08 f2 f3 23 |...#....|.#.....#|
|00000d00| 88 c3 08 f4 f5 23 88 c3 | 08 f6 f7 23 88 c3 08 f8 |.....#..|...#....|
|00000d10| f9 23 88 c3 08 fa fb 23 | 88 c3 08 fc e9 23 88 c3 |.#.....#|.....#..|
|00000d20| 08 fd cd 23 88 c3 08 fe | ff 23 88 c3 08 81 40 00 |...#....|.#....@.|
|00000d30| 81 41 00 23 88 c3 08 81 | 42 00 81 43 00 23 88 c3 |.A.#....|B..C.#..|
|00000d40| 08 81 44 00 81 45 00 23 | 88 c3 08 81 46 00 81 47 |..D..E.#|....F..G|
|00000d50| 00 23 88 c3 08 81 48 00 | 81 49 00 23 88 c3 08 81 |.#....H.|.I.#....|
|00000d60| 4a 00 81 4b 00 23 88 c3 | 08 81 4c 00 81 4d 00 23 |J..K.#..|..L..M.#|
|00000d70| 88 c3 08 81 4e 00 ff 23 | 88 c3 08 81 4f 00 81 50 |....N..#|....O..P|
|00000d80| 00 23 88 c3 08 81 51 00 | 81 52 00 23 88 c3 08 81 |.#....Q.|.R.#....|
|00000d90| 53 00 81 54 00 23 88 c3 | 08 81 55 00 81 50 00 23 |S..T.#..|..U..P.#|
|00000da0| 88 c1 87 22 20 5b 70 6f | 2d 6d 6f 64 65 2d 6d 61 |..." [po|-mode-ma|
|00000db0| 70 20 6d 61 6b 65 2d 6b | 65 79 6d 61 70 20 73 75 |p make-k|eymap su|
|00000dc0| 70 70 72 65 73 73 2d 6b | 65 79 6d 61 70 20 64 65 |ppress-k|eymap de|
|00000dd0| 66 69 6e 65 2d 6b 65 79 | 20 22 09 22 20 70 6f 2d |fine-key| "." po-|
|00000de0| 6d 73 67 69 64 2d 74 6f | 2d 6d 73 67 73 74 72 20 |msgid-to|-msgstr |
|00000df0| 22 0d 22 20 70 6f 2d 65 | 64 69 74 2d 6d 73 67 73 |"." po-e|dit-msgs|
|00000e00| 74 72 20 22 20 22 20 70 | 6f 2d 6e 65 78 74 2d 65 |tr " " p|o-next-e|
|00000e10| 6e 74 72 79 20 22 3f 22 | 20 70 6f 2d 68 65 6c 70 |ntry "?"| po-help|
|00000e20| 20 22 23 22 20 70 6f 2d | 65 64 69 74 2d 63 6f 6d | "#" po-|edit-com|
|00000e30| 6d 65 6e 74 20 22 2c 22 | 20 70 6f 2d 74 61 67 73 |ment ","| po-tags|
|00000e40| 2d 73 65 61 72 63 68 20 | 22 2e 22 20 70 6f 2d 63 |-search |"." po-c|
|00000e50| 75 72 72 65 6e 74 2d 65 | 6e 74 72 79 20 22 3c 22 |urrent-e|ntry "<"|
|00000e60| 20 70 6f 2d 66 69 72 73 | 74 2d 65 6e 74 72 79 20 | po-firs|t-entry |
|00000e70| 22 3d 22 20 70 6f 2d 73 | 74 61 74 69 73 74 69 63 |"=" po-s|tatistic|
|00000e80| 73 20 22 3e 22 20 70 6f | 2d 6c 61 73 74 2d 65 6e |s ">" po|-last-en|
|00000e90| 74 72 79 20 22 63 22 20 | 70 6f 2d 63 79 63 6c 65 |try "c" |po-cycle|
|00000ea0| 2d 72 65 66 65 72 65 6e | 63 65 20 22 64 22 20 70 |-referen|ce "d" p|
|00000eb0| 6f 2d 61 64 64 2d 70 61 | 74 68 20 22 65 22 20 70 |o-add-pa|th "e" p|
|00000ec0| 6f 2d 6e 65 78 74 2d 75 | 6e 74 72 61 6e 73 6c 61 |o-next-u|ntransla|
|00000ed0| 74 65 64 2d 65 6e 74 72 | 79 20 22 68 22 20 22 69 |ted-entr|y "h" "i|
|00000ee0| 22 20 70 6f 2d 6e 65 78 | 74 2d 69 6e 65 78 61 63 |" po-nex|t-inexac|
|00000ef0| 74 20 22 6b 22 20 70 6f | 2d 6b 69 6c 6c 2d 6d 73 |t "k" po|-kill-ms|
|00000f00| 67 73 74 72 20 22 6c 22 | 20 70 6f 2d 70 6f 70 2d |gstr "l"| po-pop-|
|00000f10| 6c 6f 63 61 74 69 6f 6e | 20 22 6d 22 20 70 6f 2d |location| "m" po-|
|00000f20| 70 75 73 68 2d 6c 6f 63 | 61 74 69 6f 6e 20 22 6e |push-loc|ation "n|
|00000f30| 22 20 22 70 22 20 70 6f | 2d 70 72 65 76 69 6f 75 |" "p" po|-previou|
|00000f40| 73 2d 65 6e 74 72 79 20 | 22 6f 22 20 70 6f 2d 6f |s-entry |"o" po-o|
|00000f50| 74 68 65 72 2d 77 69 6e | 64 6f 77 20 22 71 22 20 |ther-win|dow "q" |
|00000f60| 70 6f 2d 71 75 69 74 20 | 22 75 22 20 70 6f 2d 75 |po-quit |"u" po-u|
|00000f70| 6e 64 6f 20 22 76 22 20 | 70 6f 2d 76 61 6c 69 64 |ndo "v" |po-valid|
|00000f80| 61 74 65 20 22 56 22 20 | 70 6f 2d 6d 6f 64 65 2d |ate "V" |po-mode-|
|00000f90| 76 65 72 73 69 6f 6e 20 | 22 77 22 20 70 6f 2d 6b |version |"w" po-k|
|00000fa0| 69 6c 6c 2d 72 69 6e 67 | 2d 73 61 76 65 2d 6d 73 |ill-ring|-save-ms|
|00000fb0| 67 73 74 72 20 22 79 22 | 20 70 6f 2d 79 61 6e 6b |gstr "y"| po-yank|
|00000fc0| 2d 6d 73 67 73 74 72 20 | 22 78 22 20 70 6f 2d 65 |-msgstr |"x" po-e|
|00000fd0| 78 63 68 61 6e 67 65 2d | 6c 6f 63 61 74 69 6f 6e |xchange-|location|
|00000fe0| 20 22 7a 22 20 70 6f 2d | 66 61 64 65 2d 6f 75 74 | "z" po-|fade-out|
|00000ff0| 2d 65 6e 74 72 79 20 22 | 7f 22 20 22 8d 22 20 22 |-entry "|." "." "|
|00001000| a0 22 20 70 6f 2d 6e 65 | 78 74 2d 6f 62 73 6f 6c |." po-ne|xt-obsol|
|00001010| 65 74 65 2d 65 6e 74 72 | 79 20 22 ac 22 20 70 6f |ete-entr|y "." po|
|00001020| 2d 6d 61 72 6b 2d 74 72 | 61 6e 73 6c 61 74 61 62 |-mark-tr|anslatab|
|00001030| 6c 65 20 22 ae 22 20 70 | 6f 2d 73 65 6c 65 63 74 |le "." p|o-select|
|00001040| 2d 6d 61 72 6b 2d 61 6e | 64 2d 6d 61 72 6b 20 22 |-mark-an|d-mark "|
|00001050| e3 22 20 70 6f 2d 73 65 | 6c 65 63 74 2d 72 65 66 |." po-se|lect-ref|
|00001060| 65 72 65 6e 63 65 20 22 | e4 22 20 70 6f 2d 64 65 |erence "|." po-de|
|00001070| 6c 65 74 65 2d 70 61 74 | 68 20 22 e5 22 20 70 6f |lete-pat|h "." po|
|00001080| 2d 70 72 65 76 69 6f 75 | 73 2d 75 6e 74 72 61 6e |-previou|s-untran|
|00001090| 73 6c 61 74 65 64 2d 65 | 6e 74 72 79 20 22 e9 22 |slated-e|ntry "."|
|000010a0| 20 70 6f 2d 70 72 65 76 | 69 6f 75 73 2d 69 6e 65 | po-prev|ious-ine|
|000010b0| 78 61 63 74 20 22 eb 22 | 20 70 6f 2d 6b 69 6c 6c |xact "."| po-kill|
|000010c0| 2d 63 6f 6d 6d 65 6e 74 | 20 22 ee 22 20 22 f0 22 |-comment| "." "."|
|000010d0| 20 70 6f 2d 70 72 65 76 | 69 6f 75 73 2d 6f 62 73 | po-prev|ious-obs|
|000010e0| 6f 6c 65 74 65 2d 65 6e | 74 72 79 20 22 f7 22 20 |olete-en|try "." |
|000010f0| 70 6f 2d 6b 69 6c 6c 2d | 72 69 6e 67 2d 73 61 76 |po-kill-|ring-sav|
|00001100| 65 2d 63 6f 6d 6d 65 6e | 74 20 22 f9 22 20 70 6f |e-commen|t "." po|
|00001110| 2d 79 61 6e 6b 2d 63 6f | 6d 6d 65 6e 74 20 22 ff |-yank-co|mment ".|
|00001120| 22 5d 20 34 29 0a 23 40 | 33 39 20 4b 65 79 6d 61 |"] 4).#@|39 Keyma|
|00001130| 70 20 77 68 69 6c 65 20 | 65 64 69 74 69 6e 67 20 |p while |editing |
|00001140| 61 20 50 4f 20 6d 6f 64 | 65 20 65 6e 74 72 79 2e |a PO mod|e entry.|
|00001150| 1f 0a 28 64 65 66 76 61 | 72 20 70 6f 2d 65 64 69 |..(defva|r po-edi|
|00001160| 74 2d 6d 6f 64 65 2d 6d | 61 70 20 6e 69 6c 20 28 |t-mode-m|ap nil (|
|00001170| 23 24 20 2e 20 34 33 39 | 35 29 29 0a 28 62 79 74 |#$ . 439|5)).(byt|
|00001180| 65 2d 63 6f 64 65 20 22 | 08 84 0d 00 c1 20 10 c2 |e-code "|..... ..|
|00001190| 08 c3 c4 23 88 c1 87 22 | 20 5b 70 6f 2d 65 64 69 |...#..."| [po-edi|
|000011a0| 74 2d 6d 6f 64 65 2d 6d | 61 70 20 6d 61 6b 65 2d |t-mode-m|ap make-|
|000011b0| 73 70 61 72 73 65 2d 6b | 65 79 6d 61 70 20 64 65 |sparse-k|eymap de|
|000011c0| 66 69 6e 65 2d 6b 65 79 | 20 22 03 03 22 20 65 78 |fine-key| ".." ex|
|000011d0| 69 74 2d 72 65 63 75 72 | 73 69 76 65 2d 65 64 69 |it-recur|sive-edi|
|000011e0| 74 5d 20 34 29 0a 23 40 | 31 37 39 20 4d 61 6a 6f |t] 4).#@|179 Majo|
|000011f0| 72 20 6d 6f 64 65 20 66 | 6f 72 20 74 72 61 6e 73 |r mode f|or trans|
|00001200| 6c 61 74 6f 72 73 20 77 | 68 65 6e 20 74 68 65 79 |lators w|hen they|
|00001210| 20 65 64 69 74 20 50 4f | 20 66 69 6c 65 73 2e 0a | edit PO| files..|
|00001220| 53 70 65 63 69 61 6c 20 | 63 6f 6d 6d 61 6e 64 73 |Special |commands|
|00001230| 3a 5c 7b 70 6f 2d 6d 6f | 64 65 2d 6d 61 70 7d 0a |:\{po-mo|de-map}.|
|00001240| 54 75 72 6e 69 6e 67 20 | 6f 6e 20 50 4f 20 6d 6f |Turning |on PO mo|
|00001250| 64 65 20 63 61 6c 6c 73 | 20 74 68 65 20 76 61 6c |de calls| the val|
|00001260| 75 65 20 6f 66 20 74 68 | 65 20 76 61 72 69 61 62 |ue of th|e variab|
|00001270| 6c 65 20 60 70 6f 2d 6d | 6f 64 65 2d 68 6f 6f 6b |le `po-m|ode-hook|
|00001280| 73 27 2c 0a 69 66 20 74 | 68 61 74 20 76 61 6c 75 |s',.if t|hat valu|
|00001290| 65 20 69 73 20 6e 6f 6e | 2d 6e 69 6c 2e 1f 0a 28 |e is non|-nil...(|
|000012a0| 64 65 66 61 6c 69 61 73 | 20 27 70 6f 2d 6d 6f 64 |defalias| 'po-mod|
|000012b0| 65 20 23 5b 6e 69 6c 20 | 22 c0 20 88 c1 12 c3 14 |e #[nil |". .....|
|000012c0| c5 0e 06 21 88 c7 16 08 | c9 ca 21 88 c9 cb 21 88 |...!....|..!...!.|
|000012d0| c9 cc 21 88 c9 cd 21 88 | c9 ce 21 88 c9 cf 21 88 |..!...!.|..!...!.|
|000012e0| d0 d1 d2 d3 21 d4 51 21 | 16 0e d3 16 0f c9 d5 21 |....!.Q!|.......!|
|000012f0| 88 d3 16 15 c9 d6 21 88 | d7 16 16 c9 d8 21 88 c9 |......!.|.....!..|
|00001300| d9 21 88 c9 da 21 88 d3 | 16 18 d3 16 19 db 16 1a |.!...!..|........|
|00001310| c9 dc 21 88 c9 dd 21 88 | c9 de 21 88 c9 df 21 88 |..!...!.|..!...!.|
|00001320| d3 16 1c d3 16 1d d3 16 | 1e e0 16 1f c9 e1 21 88 |........|......!.|
|00001330| d3 16 21 e2 e3 d3 c7 23 | 83 86 00 e4 e5 21 88 e6 |..!....#|.....!..|
|00001340| e7 21 87 22 20 5b 6b 69 | 6c 6c 2d 61 6c 6c 2d 6c |.!." [ki|ll-all-l|
|00001350| 6f 63 61 6c 2d 76 61 72 | 69 61 62 6c 65 73 20 70 |ocal-var|iables p|
|00001360| 6f 2d 6d 6f 64 65 20 6d | 61 6a 6f 72 2d 6d 6f 64 |o-mode m|ajor-mod|
|00001370| 65 20 22 50 4f 22 20 6d | 6f 64 65 2d 6e 61 6d 65 |e "PO" m|ode-name|
|00001380| 20 75 73 65 2d 6c 6f 63 | 61 6c 2d 6d 61 70 20 70 | use-loc|al-map p|
|00001390| 6f 2d 6d 6f 64 65 2d 6d | 61 70 20 74 20 62 75 66 |o-mode-m|ap t buf|
|000013a0| 66 65 72 2d 72 65 61 64 | 2d 6f 6e 6c 79 20 6d 61 |fer-read|-only ma|
|000013b0| 6b 65 2d 6c 6f 63 61 6c | 2d 76 61 72 69 61 62 6c |ke-local|-variabl|
|000013c0| 65 20 70 6f 2d 73 74 61 | 72 74 2d 6f 66 2d 65 6e |e po-sta|rt-of-en|
|000013d0| 74 72 79 20 70 6f 2d 6d | 69 64 64 6c 65 2d 6f 66 |try po-m|iddle-of|
|000013e0| 2d 65 6e 74 72 79 20 70 | 6f 2d 65 6e 64 2d 6f 66 |-entry p|o-end-of|
|000013f0| 2d 65 6e 74 72 79 20 70 | 6f 2d 6f 62 73 6f 6c 65 |-entry p|o-obsole|
|00001400| 74 65 2d 66 6c 61 67 20 | 70 6f 2d 77 6f 72 6b 2d |te-flag |po-work-|
|00001410| 62 75 66 66 65 72 20 70 | 6f 2d 77 6f 72 6b 2d 62 |buffer p|o-work-b|
|00001420| 75 66 66 65 72 2d 6c 6f | 63 6b 20 67 65 6e 65 72 |uffer-lo|ck gener|
|00001430| 61 74 65 2d 6e 65 77 2d | 62 75 66 66 65 72 20 22 |ate-new-|buffer "|
|00001440| 2a 45 64 69 74 20 22 20 | 62 75 66 66 65 72 2d 6e |*Edit " |buffer-n|
|00001450| 61 6d 65 20 6e 69 6c 20 | 22 2a 22 20 70 6f 2d 6d |ame nil |"*" po-m|
|00001460| 61 72 6b 65 72 2d 73 74 | 61 63 6b 20 70 6f 2d 73 |arker-st|ack po-s|
|00001470| 65 61 72 63 68 2d 70 61 | 74 68 20 28 28 22 2e 2f |earch-pa|th (("./|
|00001480| 22 29 20 28 22 2e 2e 2f | 22 29 29 20 70 6f 2d 72 |") ("../|")) po-r|
|00001490| 65 66 65 72 65 6e 63 65 | 2d 61 6c 69 73 74 20 70 |eference|-alist p|
|000014a0| 6f 2d 72 65 66 65 72 65 | 6e 63 65 2d 63 75 72 73 |o-refere|nce-curs|
|000014b0| 6f 72 20 70 6f 2d 72 65 | 66 65 72 65 6e 63 65 2d |or po-re|ference-|
|000014c0| 63 68 65 63 6b 20 30 20 | 70 6f 2d 6e 65 78 74 2d |check 0 |po-next-|
|000014d0| 66 69 6c 65 2d 6c 69 73 | 74 20 70 6f 2d 73 74 72 |file-lis|t po-str|
|000014e0| 69 6e 67 2d 73 74 61 72 | 74 20 70 6f 2d 73 74 72 |ing-star|t po-str|
|000014f0| 69 6e 67 2d 65 6e 64 20 | 70 6f 2d 6b 65 79 77 6f |ing-end |po-keywo|
|00001500| 72 64 73 20 28 28 22 67 | 65 74 74 65 78 74 22 29 |rds (("g|ettext")|
|00001510| 20 28 22 5f 22 29 29 20 | 70 6f 2d 6f 66 66 65 72 | ("_")) |po-offer|
|00001520| 2d 76 61 6c 69 64 61 74 | 69 6f 6e 20 72 65 2d 73 |-validat|ion re-s|
|00001530| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 22 5e |earch-fo|rward "^|
|00001540| 23 21 20 49 4e 45 58 41 | 43 54 22 20 65 72 72 6f |#! INEXA|CT" erro|
|00001550| 72 20 22 54 68 65 20 66 | 69 6c 65 20 63 6f 6e 74 |r "The f|ile cont|
|00001560| 61 69 6e 73 20 49 4e 45 | 58 41 43 54 20 77 61 72 |ains INE|XACT war|
|00001570| 6e 69 6e 67 73 21 22 20 | 72 75 6e 2d 68 6f 6f 6b |nings!" |run-hook|
|00001580| 73 20 70 6f 2d 6d 6f 64 | 65 2d 68 6f 6f 6b 73 5d |s po-mod|e-hooks]|
|00001590| 20 34 20 28 23 24 20 2e | 20 34 35 38 38 29 20 6e | 4 (#$ .| 4588) n|
|000015a0| 69 6c 5d 29 0a 23 40 33 | 30 20 52 65 64 69 73 70 |il]).#@3|0 Redisp|
|000015b0| 6c 61 79 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |lay the |current |
|000015c0| 65 6e 74 72 79 2e 1f 0a | 28 64 65 66 61 6c 69 61 |entry...|(defalia|
|000015d0| 73 20 27 70 6f 2d 72 65 | 64 69 73 70 6c 61 79 20 |s 'po-re|display |
|000015e0| 23 5b 6e 69 6c 20 22 08 | 62 87 22 20 5b 70 6f 2d |#[nil ".|b." [po-|
|000015f0| 6d 69 64 64 6c 65 2d 6f | 66 2d 65 6e 74 72 79 5d |middle-o|f-entry]|
|00001600| 20 31 20 28 23 24 20 2e | 20 35 35 34 36 29 5d 29 | 1 (#$ .| 5546)])|
|00001610| 0a 23 40 35 33 20 47 65 | 74 20 74 68 65 20 63 75 |.#@53 Ge|t the cu|
|00001620| 72 73 6f 72 20 69 6e 74 | 6f 20 61 6e 6f 74 68 65 |rsor int|o anothe|
|00001630| 72 20 77 69 6e 64 6f 77 | 2c 20 6f 75 74 20 6f 66 |r window|, out of|
|00001640| 20 50 4f 20 6d 6f 64 65 | 2e 1f 0a 28 64 65 66 61 | PO mode|...(defa|
|00001650| 6c 69 61 73 20 27 70 6f | 2d 6f 74 68 65 72 2d 77 |lias 'po|-other-w|
|00001660| 69 6e 64 6f 77 20 23 5b | 6e 69 6c 20 22 c0 c1 21 |indow #[|nil "..!|
|00001670| 83 0e 00 c2 20 88 c3 c4 | 20 21 87 c5 c6 21 87 22 |.... ...| !...!."|
|00001680| 20 5b 6f 6e 65 2d 77 69 | 6e 64 6f 77 2d 70 20 74 | [one-wi|ndow-p t|
|00001690| 20 73 70 6c 69 74 2d 77 | 69 6e 64 6f 77 20 73 77 | split-w|indow sw|
|000016a0| 69 74 63 68 2d 74 6f 2d | 62 75 66 66 65 72 20 6f |itch-to-|buffer o|
|000016b0| 74 68 65 72 2d 62 75 66 | 66 65 72 20 6f 74 68 65 |ther-buf|fer othe|
|000016c0| 72 2d 77 69 6e 64 6f 77 | 20 31 5d 20 32 20 28 23 |r-window| 1] 2 (#|
|000016d0| 24 20 2e 20 35 36 35 34 | 29 20 6e 69 6c 5d 29 0a |$ . 5654|) nil]).|
|000016e0| 23 40 37 31 20 45 6e 73 | 75 72 65 20 74 68 61 74 |#@71 Ens|ure that|
|000016f0| 20 47 4e 55 20 45 6d 61 | 63 73 20 69 73 20 6e 6f | GNU Ema|cs is no|
|00001700| 74 20 63 75 72 72 65 6e | 74 6c 79 20 69 6e 20 72 |t curren|tly in r|
|00001710| 65 63 75 72 73 69 76 65 | 20 65 64 69 74 20 66 6f |ecursive| edit fo|
|00001720| 72 20 50 4f 20 6d 6f 64 | 65 2e 1f 0a 28 64 65 66 |r PO mod|e...(def|
|00001730| 61 6c 69 61 73 20 27 70 | 6f 2d 63 68 65 63 6b 2d |alias 'p|o-check-|
|00001740| 6c 6f 63 6b 20 23 5b 6e | 69 6c 20 22 08 85 14 00 |lock #[n|il "....|
|00001750| c1 5c 6e 21 88 c3 c4 21 | 83 11 00 c5 20 87 c6 c7 |.\n!...!|.... ...|
|00001760| 21 87 22 20 5b 70 6f 2d | 77 6f 72 6b 2d 62 75 66 |!." [po-|work-buf|
|00001770| 66 65 72 2d 6c 6f 63 6b | 20 70 6f 70 2d 74 6f 2d |fer-lock| pop-to-|
|00001780| 62 75 66 66 65 72 20 70 | 6f 2d 77 6f 72 6b 2d 62 |buffer p|o-work-b|
|00001790| 75 66 66 65 72 20 79 2d | 6f 72 2d 6e 2d 70 20 22 |uffer y-|or-n-p "|
|000017a0| 48 65 72 65 20 69 73 20 | 79 6f 75 72 20 63 75 72 |Here is |your cur|
|000017b0| 72 65 6e 74 20 65 64 69 | 74 2e 20 20 44 6f 20 79 |rent edi|t.  Do y|
|000017c0| 6f 75 20 77 69 73 68 20 | 74 6f 20 61 62 6f 72 74 |ou wish |to abort|
|000017d0| 20 69 74 3f 20 22 20 61 | 62 6f 72 74 2d 72 65 63 | it? " a|bort-rec|
|000017e0| 75 72 73 69 76 65 2d 65 | 64 69 74 20 65 72 72 6f |ursive-e|dit erro|
|000017f0| 72 20 22 54 79 70 65 20 | 60 43 2d 63 20 43 2d 63 |r "Type |`C-c C-c|
|00001800| 27 20 6f 6e 63 65 20 64 | 6f 6e 65 22 5d 20 32 20 |' once d|one"] 2 |
|00001810| 28 23 24 20 2e 20 35 38 | 36 31 29 5d 29 0a 23 40 |(#$ . 58|61)]).#@|
|00001820| 31 37 31 20 46 69 6e 64 | 20 74 68 65 20 65 78 74 |171 Find| the ext|
|00001830| 65 6e 74 20 6f 66 20 74 | 68 65 20 50 4f 20 66 69 |ent of t|he PO fi|
|00001840| 6c 65 20 65 6e 74 72 79 | 20 77 68 65 72 65 20 74 |le entry| where t|
|00001850| 68 65 20 63 75 72 73 6f | 72 20 69 73 2e 0a 53 65 |he curso|r is..Se|
|00001860| 74 20 76 61 72 69 61 62 | 6c 65 73 20 50 4f 2d 53 |t variab|les PO-S|
|00001870| 54 41 52 54 2d 4f 46 2d | 45 4e 54 52 59 2c 20 50 |TART-OF-|ENTRY, P|
|00001880| 4f 2d 4d 49 44 44 4c 45 | 2d 4f 46 2d 45 4e 54 52 |O-MIDDLE|-OF-ENTR|
|00001890| 59 2c 20 50 4f 2d 45 4e | 44 2d 4f 46 2d 45 4e 54 |Y, PO-EN|D-OF-ENT|
|000018a0| 52 59 0a 61 6e 64 20 50 | 4f 2d 4f 42 53 4f 4c 45 |RY.and P|O-OBSOLE|
|000018b0| 54 45 2d 46 4c 41 47 20 | 74 6f 20 6d 65 61 6e 69 |TE-FLAG |to meani|
|000018c0| 6e 67 66 75 6c 20 76 61 | 6c 75 65 73 2e 1f 0a 28 |ngful va|lues...(|
|000018d0| 64 65 66 61 6c 69 61 73 | 20 27 70 6f 2d 66 69 6e |defalias| 'po-fin|
|000018e0| 64 2d 73 70 61 6e 2d 6f | 66 2d 65 6e 74 72 79 20 |d-span-o|f-entry |
|000018f0| 23 5b 6e 69 6c 20 22 60 | 18 c1 5c 6e c3 c4 23 83 |#[nil "`|..\n..#.|
|00001900| 55 00 c5 5c 6e 21 88 60 | 08 58 83 31 00 60 16 06 |U..\n!.`|.X.1.`..|
|00001910| c5 5c 6e c3 c4 23 83 2a | 00 c7 94 16 08 c7 95 16 |.\n..#.*|........|
|00001920| 09 82 75 00 ca cb 21 88 | 82 75 00 c7 94 16 08 c7 |..u...!.|.u......|
|00001930| 95 16 09 c7 94 62 88 c1 | 5c 6e c3 c4 23 83 4f 00 |.....b..|\n..#.O.|
|00001940| c7 95 62 88 60 16 06 82 | 75 00 65 16 06 82 75 00 |..b.`...|u.e...u.|
|00001950| 65 62 88 60 16 06 c5 5c | 6e c3 c4 23 83 6e 00 c7 |eb.`...\|n..#.n..|
|00001960| 94 16 08 c7 95 16 09 82 | 75 00 08 62 88 ca cc 21 |........|u..b...!|
|00001970| 88 08 62 88 29 0e 08 66 | cd 3d 89 16 0e 87 22 20 |..b.)..f|.=...." |
|00001980| 5b 68 65 72 65 20 72 65 | 2d 73 65 61 72 63 68 2d |[here re|-search-|
|00001990| 62 61 63 6b 77 61 72 64 | 20 70 6f 2d 61 6e 79 2d |backward| po-any-|
|000019a0| 6d 73 67 73 74 72 2d 72 | 65 67 65 78 70 20 6e 69 |msgstr-r|egexp ni|
|000019b0| 6c 20 74 20 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |l t re-s|earch-fo|
|000019c0| 72 77 61 72 64 20 70 6f | 2d 73 74 61 72 74 2d 6f |rward po|-start-o|
|000019d0| 66 2d 65 6e 74 72 79 20 | 30 20 70 6f 2d 6d 69 64 |f-entry |0 po-mid|
|000019e0| 64 6c 65 2d 6f 66 2d 65 | 6e 74 72 79 20 70 6f 2d |dle-of-e|ntry po-|
|000019f0| 65 6e 64 2d 6f 66 2d 65 | 6e 74 72 79 20 65 72 72 |end-of-e|ntry err|
|00001a00| 6f 72 20 22 41 66 74 65 | 72 20 6c 61 73 74 20 65 |or "Afte|r last e|
|00001a10| 6e 74 72 79 22 20 22 4e | 6f 20 65 6e 74 72 69 65 |ntry" "N|o entrie|
|00001a20| 73 22 20 33 35 20 70 6f | 2d 6f 62 73 6f 6c 65 74 |s" 35 po|-obsolet|
|00001a30| 65 2d 66 6c 61 67 5d 20 | 34 20 28 23 24 20 2e 20 |e-flag] |4 (#$ . |
|00001a40| 36 31 38 30 29 5d 29 0a | 23 40 35 32 20 54 65 6c |6180)]).|#@52 Tel|
|00001a50| 6c 20 68 6f 77 20 6d 61 | 6e 79 20 65 6e 74 72 69 |l how ma|ny entri|
|00001a60| 65 73 20 69 6e 20 74 68 | 65 20 65 6e 74 72 79 20 |es in th|e entry |
|00001a70| 6c 6f 63 61 74 69 6f 6e | 20 73 74 61 63 6b 2e 1f |location| stack..|
|00001a80| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 70 6f 2d 73 |.(defali|as 'po-s|
|00001a90| 61 79 2d 6c 6f 63 61 74 | 69 6f 6e 2d 64 65 70 74 |ay-locat|ion-dept|
|00001aa0| 68 20 23 5b 6e 69 6c 20 | 22 08 47 89 19 c2 55 83 |h #[nil |".G...U.|
|00001ab0| 0f 00 c3 c4 21 82 1f 00 | 09 c5 55 83 1b 00 c3 c6 |....!...|..U.....|
|00001ac0| 21 82 1f 00 c3 c7 09 5c | 22 29 87 22 20 5b 70 6f |!......\|")." [po|
|00001ad0| 2d 6d 61 72 6b 65 72 2d | 73 74 61 63 6b 20 64 65 |-marker-|stack de|
|00001ae0| 70 74 68 20 30 20 6d 65 | 73 73 61 67 65 20 22 54 |pth 0 me|ssage "T|
|00001af0| 68 65 20 6c 6f 63 61 74 | 69 6f 6e 20 73 74 61 63 |he locat|ion stac|
|00001b00| 6b 20 69 73 20 6e 6f 77 | 20 65 6d 70 74 79 22 20 |k is now| empty" |
|00001b10| 31 20 22 54 68 65 20 6c | 6f 63 61 74 69 6f 6e 20 |1 "The l|ocation |
|00001b20| 73 74 61 63 6b 20 68 61 | 73 20 6f 6e 65 20 65 6e |stack ha|s one en|
|00001b30| 74 72 79 22 20 22 54 68 | 65 20 6c 6f 63 61 74 69 |try" "Th|e locati|
|00001b40| 6f 6e 20 73 74 61 63 6b | 20 63 6f 6e 74 61 69 6e |on stack| contain|
|00001b50| 73 20 25 64 20 65 6e 74 | 72 69 65 73 22 5d 20 34 |s %d ent|ries"] 4|
|00001b60| 20 28 23 24 20 2e 20 36 | 37 33 33 29 5d 29 0a 23 | (#$ . 6|733)]).#|
|00001b70| 40 36 30 20 53 74 61 63 | 6b 20 74 68 65 20 6c 6f |@60 Stac|k the lo|
|00001b80| 63 61 74 69 6f 6e 20 6f | 66 20 74 68 65 20 63 75 |cation o|f the cu|
|00001b90| 72 72 65 6e 74 20 65 6e | 74 72 79 2c 20 66 6f 72 |rrent en|try, for|
|00001ba0| 20 6c 61 74 65 72 20 72 | 65 74 75 72 6e 2e 1f 0a | later r|eturn...|
|00001bb0| 28 64 65 66 61 6c 69 61 | 73 20 27 70 6f 2d 70 75 |(defalia|s 'po-pu|
|00001bc0| 73 68 2d 6c 6f 63 61 74 | 69 6f 6e 20 23 5b 6e 69 |sh-locat|ion #[ni|
|00001bd0| 6c 20 22 c0 20 88 8a 09 | 62 88 c2 20 0b 42 13 29 |l ". ...|b.. .B.)|
|00001be0| c4 20 87 22 20 5b 70 6f | 2d 66 69 6e 64 2d 73 70 |. ." [po|-find-sp|
|00001bf0| 61 6e 2d 6f 66 2d 65 6e | 74 72 79 20 70 6f 2d 6d |an-of-en|try po-m|
|00001c00| 69 64 64 6c 65 2d 6f 66 | 2d 65 6e 74 72 79 20 70 |iddle-of|-entry p|
|00001c10| 6f 69 6e 74 2d 6d 61 72 | 6b 65 72 20 70 6f 2d 6d |oint-mar|ker po-m|
|00001c20| 61 72 6b 65 72 2d 73 74 | 61 63 6b 20 70 6f 2d 73 |arker-st|ack po-s|
|00001c30| 61 79 2d 6c 6f 63 61 74 | 69 6f 6e 2d 64 65 70 74 |ay-locat|ion-dept|
|00001c40| 68 5d 20 32 20 28 23 24 | 20 2e 20 37 30 32 38 29 |h] 2 (#$| . 7028)|
|00001c50| 20 6e 69 6c 5d 29 0a 23 | 40 36 36 20 55 6e 73 74 | nil]).#|@66 Unst|
|00001c60| 61 63 6b 20 61 20 73 61 | 76 65 64 20 6c 6f 63 61 |ack a sa|ved loca|
|00001c70| 74 69 6f 6e 2c 20 61 6e | 64 20 72 65 74 75 72 6e |tion, an|d return|
|00001c80| 20 74 6f 20 74 68 65 20 | 63 6f 72 72 65 73 70 6f | to the |correspo|
|00001c90| 6e 64 69 6e 67 20 65 6e | 74 72 79 2e 1f 0a 28 64 |nding en|try...(d|
|00001ca0| 65 66 61 6c 69 61 73 20 | 27 70 6f 2d 70 6f 70 2d |efalias |'po-pop-|
|00001cb0| 6c 6f 63 61 74 69 6f 6e | 20 23 5b 6e 69 6c 20 22 |location| #[nil "|
|00001cc0| 08 83 11 00 08 40 62 88 | 08 41 10 c1 20 88 c2 20 |.....@b.|.A.. .. |
|00001cd0| 87 c3 c4 21 87 22 20 5b | 70 6f 2d 6d 61 72 6b 65 |...!." [|po-marke|
|00001ce0| 72 2d 73 74 61 63 6b 20 | 70 6f 2d 63 75 72 72 65 |r-stack |po-curre|
|00001cf0| 6e 74 2d 65 6e 74 72 79 | 20 70 6f 2d 73 61 79 2d |nt-entry| po-say-|
|00001d00| 6c 6f 63 61 74 69 6f 6e | 2d 64 65 70 74 68 20 65 |location|-depth e|
|00001d10| 72 72 6f 72 20 22 54 68 | 65 20 65 6e 74 72 79 20 |rror "Th|e entry |
|00001d20| 6c 6f 63 61 74 69 6f 6e | 20 73 74 61 63 6b 20 69 |location| stack i|
|00001d30| 73 20 65 6d 70 74 79 22 | 5d 20 32 20 28 23 24 20 |s empty"|] 2 (#$ |
|00001d40| 2e 20 37 32 36 30 29 20 | 6e 69 6c 5d 29 0a 23 40 |. 7260) |nil]).#@|
|00001d50| 36 37 20 45 78 63 68 61 | 6e 67 65 20 74 68 65 20 |67 Excha|nge the |
|00001d60| 6c 6f 63 61 74 69 6f 6e | 20 6f 66 20 74 68 65 20 |location| of the |
|00001d70| 63 75 72 72 65 6e 74 20 | 65 6e 74 72 79 20 77 69 |current |entry wi|
|00001d80| 74 68 20 74 68 65 20 74 | 6f 70 20 6f 66 20 73 74 |th the t|op of st|
|00001d90| 61 63 6b 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |ack...(d|efalias |
|00001da0| 27 70 6f 2d 65 78 63 68 | 61 6e 67 65 2d 6c 6f 63 |'po-exch|ange-loc|
|00001db0| 61 74 69 6f 6e 20 23 5b | 6e 69 6c 20 22 08 83 1d |ation #[|nil "...|
|00001dc0| 00 c1 20 88 5c 6e 62 88 | c3 20 1c 08 40 62 88 5c |.. .\nb.|. ..@b.\|
|00001dd0| 66 08 41 42 10 29 c5 20 | 88 c6 20 87 c7 c8 21 87 |f.AB.). |.. ...!.|
|00001de0| 22 20 5b 70 6f 2d 6d 61 | 72 6b 65 72 2d 73 74 61 |" [po-ma|rker-sta|
|00001df0| 63 6b 20 70 6f 2d 66 69 | 6e 64 2d 73 70 61 6e 2d |ck po-fi|nd-span-|
|00001e00| 6f 66 2d 65 6e 74 72 79 | 20 70 6f 2d 6d 69 64 64 |of-entry| po-midd|
|00001e10| 6c 65 2d 6f 66 2d 65 6e | 74 72 79 20 70 6f 69 6e |le-of-en|try poin|
|00001e20| 74 2d 6d 61 72 6b 65 72 | 20 6c 6f 63 61 74 69 6f |t-marker| locatio|
|00001e30| 6e 20 70 6f 2d 63 75 72 | 72 65 6e 74 2d 65 6e 74 |n po-cur|rent-ent|
|00001e40| 72 79 20 70 6f 2d 73 61 | 79 2d 6c 6f 63 61 74 69 |ry po-sa|y-locati|
|00001e50| 6f 6e 2d 64 65 70 74 68 | 20 65 72 72 6f 72 20 22 |on-depth| error "|
|00001e60| 54 68 65 20 65 6e 74 72 | 79 20 6c 6f 63 61 74 69 |The entr|y locati|
|00001e70| 6f 6e 20 73 74 61 63 6b | 20 69 73 20 65 6d 70 74 |on stack| is empt|
|00001e80| 79 22 5d 20 32 20 28 23 | 24 20 2e 20 37 35 30 37 |y"] 2 (#|$ . 7507|
|00001e90| 29 20 6e 69 6c 5d 29 0a | 23 40 32 38 20 44 69 73 |) nil]).|#@28 Dis|
|00001ea0| 70 6c 61 79 20 74 68 65 | 20 63 75 72 72 65 6e 74 |play the| current|
|00001eb0| 20 65 6e 74 72 79 2e 1f | 0a 28 64 65 66 61 6c 69 | entry..|.(defali|
|00001ec0| 61 73 20 27 70 6f 2d 63 | 75 72 72 65 6e 74 2d 65 |as 'po-c|urrent-e|
|00001ed0| 6e 74 72 79 20 23 5b 6e | 69 6c 20 22 c0 20 88 c1 |ntry #[n|il ". ..|
|00001ee0| 20 87 22 20 5b 70 6f 2d | 66 69 6e 64 2d 73 70 61 | ." [po-|find-spa|
|00001ef0| 6e 2d 6f 66 2d 65 6e 74 | 72 79 20 70 6f 2d 72 65 |n-of-ent|ry po-re|
|00001f00| 64 69 73 70 6c 61 79 5d | 20 31 20 28 23 24 20 2e |display]| 1 (#$ .|
|00001f10| 20 37 38 33 37 29 20 6e | 69 6c 5d 29 0a 23 40 36 | 7837) n|il]).#@6|
|00001f20| 36 20 44 69 73 70 6c 61 | 79 20 74 68 65 20 66 69 |6 Displa|y the fi|
|00001f30| 72 73 74 20 65 6e 74 72 | 79 20 69 6e 20 74 68 65 |rst entr|y in the|
|00001f40| 20 66 69 6c 65 20 77 68 | 69 63 68 20 6d 73 67 73 | file wh|ich msgs|
|00001f50| 74 72 20 6d 61 74 63 68 | 65 73 20 52 45 47 45 58 |tr match|es REGEX|
|00001f60| 50 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 70 |P...(def|alias 'p|
|00001f70| 6f 2d 66 69 72 73 74 2d | 65 6e 74 72 79 2d 77 69 |o-first-|entry-wi|
|00001f80| 74 68 2d 72 65 67 65 78 | 70 20 23 5b 28 72 65 67 |th-regex|p #[(reg|
|00001f90| 65 78 70 29 20 22 60 18 | 65 62 88 c1 5c 6e c3 c4 |exp) "`.|eb..\n..|
|00001fa0| 23 83 16 00 c5 94 62 88 | c6 20 82 1c 00 08 62 88 |#.....b.|. ....b.|
|00001fb0| c7 c8 21 29 87 22 20 5b | 68 65 72 65 20 72 65 2d |..!)." [|here re-|
|00001fc0| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 72 |search-f|orward r|
|00001fd0| 65 67 65 78 70 20 6e 69 | 6c 20 74 20 30 20 70 6f |egexp ni|l t 0 po|
|00001fe0| 2d 63 75 72 72 65 6e 74 | 2d 65 6e 74 72 79 20 65 |-current|-entry e|
|00001ff0| 72 72 6f 72 20 22 54 68 | 65 72 65 20 69 73 20 6e |rror "Th|ere is n|
|00002000| 6f 20 73 75 63 68 20 65 | 6e 74 72 79 22 5d 20 34 |o such e|ntry"] 4|
|00002010| 20 28 23 24 20 2e 20 37 | 39 37 30 29 5d 29 0a 23 | (#$ . 7|970)]).#|
|00002020| 40 36 35 20 44 69 73 70 | 6c 61 79 20 74 68 65 20 |@65 Disp|lay the |
|00002030| 6c 61 73 74 20 65 6e 74 | 72 79 20 69 6e 20 74 68 |last ent|ry in th|
|00002040| 65 20 66 69 6c 65 20 77 | 68 69 63 68 20 6d 73 67 |e file w|hich msg|
|00002050| 73 74 72 20 6d 61 74 63 | 68 65 73 20 52 45 47 45 |str matc|hes REGE|
|00002060| 58 50 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |XP...(de|falias '|
|00002070| 70 6f 2d 6c 61 73 74 2d | 65 6e 74 72 79 2d 77 69 |po-last-|entry-wi|
|00002080| 74 68 2d 72 65 67 65 78 | 70 20 23 5b 28 72 65 67 |th-regex|p #[(reg|
|00002090| 65 78 70 29 20 22 60 18 | 64 62 88 c1 5c 6e c3 c4 |exp) "`.|db..\n..|
|000020a0| 23 83 12 00 c5 20 82 18 | 00 08 62 88 c6 c7 21 29 |#.... ..|..b...!)|
|000020b0| 87 22 20 5b 68 65 72 65 | 20 72 65 2d 73 65 61 72 |." [here| re-sear|
|000020c0| 63 68 2d 62 61 63 6b 77 | 61 72 64 20 72 65 67 65 |ch-backw|ard rege|
|000020d0| 78 70 20 6e 69 6c 20 74 | 20 70 6f 2d 63 75 72 72 |xp nil t| po-curr|
|000020e0| 65 6e 74 2d 65 6e 74 72 | 79 20 65 72 72 6f 72 20 |ent-entr|y error |
|000020f0| 22 54 68 65 72 65 20 69 | 73 20 6e 6f 20 73 75 63 |"There i|s no suc|
|00002100| 68 20 65 6e 74 72 79 22 | 5d 20 34 20 28 23 24 20 |h entry"|] 4 (#$ |
|00002110| 2e 20 38 32 32 38 29 5d | 29 0a 23 40 31 33 35 20 |. 8228)]|).#@135 |
|00002120| 44 69 73 70 6c 61 79 20 | 74 68 65 20 65 6e 74 72 |Display |the entr|
|00002130| 79 20 66 6f 6c 6c 6f 77 | 69 6e 67 20 74 68 65 20 |y follow|ing the |
|00002140| 63 75 72 72 65 6e 74 20 | 65 6e 74 72 79 20 77 68 |current |entry wh|
|00002150| 69 63 68 20 6d 73 67 73 | 74 72 20 6d 61 74 63 68 |ich msgs|tr match|
|00002160| 65 73 20 52 45 47 45 58 | 50 2e 0a 49 66 20 57 52 |es REGEX|P..If WR|
|00002170| 41 50 20 69 73 20 6e 6f | 74 20 6e 69 6c 2c 20 74 |AP is no|t nil, t|
|00002180| 68 65 20 73 65 61 72 63 | 68 20 6d 61 79 20 77 72 |he searc|h may wr|
|00002190| 61 70 20 61 72 6f 75 6e | 64 20 74 68 65 20 62 75 |ap aroun|d the bu|
|000021a0| 66 66 65 72 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |ffer...(|defalias|
|000021b0| 20 27 70 6f 2d 6e 65 78 | 74 2d 65 6e 74 72 79 2d | 'po-nex|t-entry-|
|000021c0| 77 69 74 68 2d 72 65 67 | 65 78 70 20 23 5b 28 72 |with-reg|exp #[(r|
|000021d0| 65 67 65 78 70 20 77 72 | 61 70 29 20 22 c0 20 88 |egexp wr|ap) ". .|
|000021e0| 60 19 5c 6e 62 88 c3 5c | 66 c5 c6 23 83 19 00 c7 |`.\nb..\|f..#....|
|000021f0| 94 62 88 c8 20 82 3d 00 | 0e 09 83 37 00 65 62 88 |.b.. .=.|...7.eb.|
|00002200| c3 5c 66 0e 5c 6e c6 23 | 83 37 00 c7 94 62 88 c8 |.\f.\n.#|.7...b..|
|00002210| 20 88 cb cc 21 82 3d 00 | 09 62 88 cd ce 21 29 87 | ...!.=.|.b...!).|
|00002220| 22 20 5b 70 6f 2d 66 69 | 6e 64 2d 73 70 61 6e 2d |" [po-fi|nd-span-|
|00002230| 6f 66 2d 65 6e 74 72 79 | 20 68 65 72 65 20 70 6f |of-entry| here po|
|00002240| 2d 65 6e 64 2d 6f 66 2d | 65 6e 74 72 79 20 72 65 |-end-of-|entry re|
|00002250| 2d 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 |-search-|forward |
|00002260| 72 65 67 65 78 70 20 6e | 69 6c 20 74 20 30 20 70 |regexp n|il t 0 p|
|00002270| 6f 2d 63 75 72 72 65 6e | 74 2d 65 6e 74 72 79 20 |o-curren|t-entry |
|00002280| 77 72 61 70 20 70 6f 2d | 73 74 61 72 74 2d 6f 66 |wrap po-|start-of|
|00002290| 2d 65 6e 74 72 79 20 6d | 65 73 73 61 67 65 20 22 |-entry m|essage "|
|000022a0| 57 72 61 70 70 69 6e 67 | 20 61 72 6f 75 6e 64 20 |Wrapping| around |
|000022b0| 74 68 65 20 62 75 66 66 | 65 72 22 20 65 72 72 6f |the buff|er" erro|
|000022c0| 72 20 22 54 68 65 72 65 | 20 69 73 20 6e 6f 20 73 |r "There| is no s|
|000022d0| 75 63 68 20 65 6e 74 72 | 79 22 5d 20 34 20 28 23 |uch entr|y"] 4 (#|
|000022e0| 24 20 2e 20 38 34 38 30 | 29 5d 29 0a 23 40 31 33 |$ . 8480|)]).#@13|
|000022f0| 37 20 52 65 64 69 73 70 | 6c 61 79 20 74 68 65 20 |7 Redisp|lay the |
|00002300| 65 6e 74 72 79 20 70 72 | 65 63 65 64 69 6e 67 20 |entry pr|eceding |
|00002310| 74 68 65 20 63 75 72 72 | 65 6e 74 20 65 6e 74 72 |the curr|ent entr|
|00002320| 79 20 77 68 69 63 68 20 | 6d 73 67 73 74 72 20 6d |y which |msgstr m|
|00002330| 61 74 63 68 65 73 20 52 | 45 47 45 58 50 2e 0a 49 |atches R|EGEXP..I|
|00002340| 66 20 57 52 41 50 20 69 | 73 20 6e 6f 74 20 6e 69 |f WRAP i|s not ni|
|00002350| 6c 2c 20 74 68 65 20 73 | 65 61 72 63 68 20 6d 61 |l, the s|earch ma|
|00002360| 79 20 77 72 61 70 20 61 | 72 6f 75 6e 64 20 74 68 |y wrap a|round th|
|00002370| 65 20 62 75 66 66 65 72 | 2e 1f 0a 28 64 65 66 61 |e buffer|...(defa|
|00002380| 6c 69 61 73 20 27 70 6f | 2d 70 72 65 76 69 6f 75 |lias 'po|-previou|
|00002390| 73 2d 65 6e 74 72 79 2d | 77 69 74 68 2d 72 65 67 |s-entry-|with-reg|
|000023a0| 65 78 70 20 23 5b 28 72 | 65 67 65 78 70 20 77 72 |exp #[(r|egexp wr|
|000023b0| 61 70 29 20 22 c0 20 88 | 60 19 5c 6e 62 88 c3 5c |ap) ". .|`.\nb..\|
|000023c0| 66 c5 c6 23 83 15 00 c7 | 20 82 35 00 0e 08 83 2f |f..#....| .5..../|
|000023d0| 00 64 62 88 c3 5c 66 0e | 09 c6 23 83 2f 00 c7 20 |.db..\f.|..#./.. |
|000023e0| 88 ca cb 21 82 35 00 09 | 62 88 cc cd 21 29 87 22 |...!.5..|b...!)."|
|000023f0| 20 5b 70 6f 2d 66 69 6e | 64 2d 73 70 61 6e 2d 6f | [po-fin|d-span-o|
|00002400| 66 2d 65 6e 74 72 79 20 | 68 65 72 65 20 70 6f 2d |f-entry |here po-|
|00002410| 73 74 61 72 74 2d 6f 66 | 2d 65 6e 74 72 79 20 72 |start-of|-entry r|
|00002420| 65 2d 73 65 61 72 63 68 | 2d 62 61 63 6b 77 61 72 |e-search|-backwar|
|00002430| 64 20 72 65 67 65 78 70 | 20 6e 69 6c 20 74 20 70 |d regexp| nil t p|
|00002440| 6f 2d 63 75 72 72 65 6e | 74 2d 65 6e 74 72 79 20 |o-curren|t-entry |
|00002450| 77 72 61 70 20 70 6f 2d | 65 6e 64 2d 6f 66 2d 65 |wrap po-|end-of-e|
|00002460| 6e 74 72 79 20 6d 65 73 | 73 61 67 65 20 22 57 72 |ntry mes|sage "Wr|
|00002470| 61 70 70 69 6e 67 20 61 | 72 6f 75 6e 64 20 74 68 |apping a|round th|
|00002480| 65 20 62 75 66 66 65 72 | 22 20 65 72 72 6f 72 20 |e buffer|" error |
|00002490| 22 54 68 65 72 65 20 69 | 73 20 6e 6f 20 73 75 63 |"There i|s no suc|
|000024a0| 68 20 65 6e 74 72 79 22 | 5d 20 34 20 28 23 24 20 |h entry"|] 4 (#$ |
|000024b0| 2e 20 38 39 34 36 29 5d | 29 0a 23 40 32 36 20 44 |. 8946)]|).#@26 D|
|000024c0| 69 73 70 6c 61 79 20 74 | 68 65 20 66 69 72 73 74 |isplay t|he first|
|000024d0| 20 65 6e 74 72 79 2e 1f | 0a 28 64 65 66 61 6c 69 | entry..|.(defali|
|000024e0| 61 73 20 27 70 6f 2d 66 | 69 72 73 74 2d 65 6e 74 |as 'po-f|irst-ent|
|000024f0| 72 79 20 23 5b 6e 69 6c | 20 22 c0 09 21 87 22 20 |ry #[nil| "..!." |
|00002500| 5b 70 6f 2d 66 69 72 73 | 74 2d 65 6e 74 72 79 2d |[po-firs|t-entry-|
|00002510| 77 69 74 68 2d 72 65 67 | 65 78 70 20 70 6f 2d 61 |with-reg|exp po-a|
|00002520| 6e 79 2d 6d 73 67 73 74 | 72 2d 72 65 67 65 78 70 |ny-msgst|r-regexp|
|00002530| 5d 20 32 20 28 23 24 20 | 2e 20 39 34 30 37 29 20 |] 2 (#$ |. 9407) |
|00002540| 6e 69 6c 5d 29 0a 23 40 | 32 35 20 44 69 73 70 6c |nil]).#@|25 Displ|
|00002550| 61 79 20 74 68 65 20 6c | 61 73 74 20 65 6e 74 72 |ay the l|ast entr|
|00002560| 79 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 70 |y...(def|alias 'p|
|00002570| 6f 2d 6c 61 73 74 2d 65 | 6e 74 72 79 20 23 5b 6e |o-last-e|ntry #[n|
|00002580| 69 6c 20 22 c0 09 21 87 | 22 20 5b 70 6f 2d 6c 61 |il "..!.|" [po-la|
|00002590| 73 74 2d 65 6e 74 72 79 | 2d 77 69 74 68 2d 72 65 |st-entry|-with-re|
|000025a0| 67 65 78 70 20 70 6f 2d | 61 6e 79 2d 6d 73 67 73 |gexp po-|any-msgs|
|000025b0| 74 72 2d 72 65 67 65 78 | 70 5d 20 32 20 28 23 24 |tr-regex|p] 2 (#$|
|000025c0| 20 2e 20 39 35 34 37 29 | 20 6e 69 6c 5d 29 0a 23 | . 9547)| nil]).#|
|000025d0| 40 34 38 20 44 69 73 70 | 6c 61 79 20 74 68 65 20 |@48 Disp|lay the |
|000025e0| 65 6e 74 72 79 20 66 6f | 6c 6c 6f 77 69 6e 67 20 |entry fo|llowing |
|000025f0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 65 6e 74 72 |the curr|ent entr|
|00002600| 79 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 70 |y...(def|alias 'p|
|00002610| 6f 2d 6e 65 78 74 2d 65 | 6e 74 72 79 20 23 5b 6e |o-next-e|ntry #[n|
|00002620| 69 6c 20 22 c0 09 c2 5c | 22 87 22 20 5b 70 6f 2d |il "...\|"." [po-|
|00002630| 6e 65 78 74 2d 65 6e 74 | 72 79 2d 77 69 74 68 2d |next-ent|ry-with-|
|00002640| 72 65 67 65 78 70 20 70 | 6f 2d 61 6e 79 2d 6d 73 |regexp p|o-any-ms|
|00002650| 67 73 74 72 2d 72 65 67 | 65 78 70 20 6e 69 6c 5d |gstr-reg|exp nil]|
|00002660| 20 33 20 28 23 24 20 2e | 20 39 36 38 34 29 20 6e | 3 (#$ .| 9684) n|
|00002670| 69 6c 5d 29 0a 23 40 34 | 38 20 44 69 73 70 6c 61 |il]).#@4|8 Displa|
|00002680| 79 20 74 68 65 20 65 6e | 74 72 79 20 70 72 65 63 |y the en|try prec|
|00002690| 65 64 69 6e 67 20 74 68 | 65 20 63 75 72 72 65 6e |eding th|e curren|
|000026a0| 74 20 65 6e 74 72 79 2e | 1f 0a 28 64 65 66 61 6c |t entry.|..(defal|
|000026b0| 69 61 73 20 27 70 6f 2d | 70 72 65 76 69 6f 75 73 |ias 'po-|previous|
|000026c0| 2d 65 6e 74 72 79 20 23 | 5b 6e 69 6c 20 22 c0 09 |-entry #|[nil "..|
|000026d0| c2 5c 22 87 22 20 5b 70 | 6f 2d 70 72 65 76 69 6f |.\"." [p|o-previo|
|000026e0| 75 73 2d 65 6e 74 72 79 | 2d 77 69 74 68 2d 72 65 |us-entry|-with-re|
|000026f0| 67 65 78 70 20 70 6f 2d | 61 6e 79 2d 6d 73 67 73 |gexp po-|any-msgs|
|00002700| 74 72 2d 72 65 67 65 78 | 70 20 6e 69 6c 5d 20 33 |tr-regex|p nil] 3|
|00002710| 20 28 23 24 20 2e 20 39 | 38 35 30 29 20 6e 69 6c | (#$ . 9|850) nil|
|00002720| 5d 29 0a 23 40 36 35 20 | 52 65 67 65 78 70 20 77 |]).#@65 |Regexp w|
|00002730| 68 69 63 68 20 73 68 6f | 75 6c 64 20 62 65 20 74 |hich sho|uld be t|
|00002740| 72 75 65 20 61 66 74 65 | 72 20 61 20 66 75 6c 6c |rue afte|r a full|
|00002750| 20 6d 73 67 73 74 72 20 | 73 74 72 69 6e 67 20 6d | msgstr |string m|
|00002760| 61 74 63 68 65 64 2e 1f | 0a 28 64 65 66 76 61 72 |atched..|.(defvar|
|00002770| 20 70 6f 2d 61 66 74 65 | 72 2d 65 6e 74 72 79 2d | po-afte|r-entry-|
|00002780| 72 65 67 65 78 70 20 22 | 5c 5c 28 5c 5c 27 5c 5c |regexp "|\\(\\'\\|
|00002790| 7c 5c 5c 28 23 5b 20 09 | 5d 2a 5c 5c 29 3f 5b 5e ||\\(#[ .|]*\\)?[^|
|000027a0| 5c 22 5d 5c 5c 29 22 20 | 28 23 24 20 2e 20 31 30 |\"]\\)" |(#$ . 10|
|000027b0| 30 32 34 29 29 0a 23 40 | 36 39 20 52 65 67 65 78 |024)).#@|69 Regex|
|000027c0| 70 20 6d 61 74 63 68 69 | 6e 67 20 61 20 77 68 6f |p matchi|ng a who|
|000027d0| 6c 65 20 6d 73 67 73 74 | 72 20 66 69 65 6c 64 2c |le msgst|r field,|
|000027e0| 20 62 75 74 20 6f 6e 6c | 79 20 69 66 20 61 63 74 | but onl|y if act|
|000027f0| 69 76 65 20 61 6e 64 20 | 65 6d 70 74 79 2e 1f 0a |ive and |empty...|
|00002800| 28 64 65 66 76 61 72 20 | 70 6f 2d 65 6d 70 74 79 |(defvar |po-empty|
|00002810| 2d 6d 73 67 73 74 72 2d | 72 65 67 65 78 70 20 28 |-msgstr-|regexp (|
|00002820| 63 6f 6e 63 61 74 20 22 | 5e 6d 73 67 73 74 72 5b |concat "|^msgstr[|
|00002830| 20 09 5d 2a 5c 22 5c 22 | 5c 6e 22 20 70 6f 2d 61 | .]*\"\"|\n" po-a|
|00002840| 66 74 65 72 2d 65 6e 74 | 72 79 2d 72 65 67 65 78 |fter-ent|ry-regex|
|00002850| 70 29 20 28 23 24 20 2e | 20 31 30 31 37 31 29 29 |p) (#$ .| 10171))|
|00002860| 0a 23 40 36 35 20 46 69 | 6e 64 20 74 68 65 20 6e |.#@65 Fi|nd the n|
|00002870| 65 78 74 20 75 6e 74 72 | 61 6e 73 6c 61 74 65 64 |ext untr|anslated|
|00002880| 20 65 6e 74 72 79 2c 20 | 77 72 61 70 70 69 6e 67 | entry, |wrapping|
|00002890| 20 61 72 6f 75 6e 64 20 | 69 66 20 6e 65 63 65 73 | around |if neces|
|000028a0| 73 61 72 79 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |sary...(|defalias|
|000028b0| 20 27 70 6f 2d 6e 65 78 | 74 2d 75 6e 74 72 61 6e | 'po-nex|t-untran|
|000028c0| 73 6c 61 74 65 64 2d 65 | 6e 74 72 79 20 23 5b 6e |slated-e|ntry #[n|
|000028d0| 69 6c 20 22 c0 09 c2 5c | 22 87 22 20 5b 70 6f 2d |il "...\|"." [po-|
|000028e0| 6e 65 78 74 2d 65 6e 74 | 72 79 2d 77 69 74 68 2d |next-ent|ry-with-|
|000028f0| 72 65 67 65 78 70 20 70 | 6f 2d 65 6d 70 74 79 2d |regexp p|o-empty-|
|00002900| 6d 73 67 73 74 72 2d 72 | 65 67 65 78 70 20 74 5d |msgstr-r|egexp t]|
|00002910| 20 33 20 28 23 24 20 2e | 20 31 30 33 34 32 29 20 | 3 (#$ .| 10342) |
|00002920| 6e 69 6c 5d 29 0a 23 40 | 36 39 20 46 69 6e 64 20 |nil]).#@|69 Find |
|00002930| 74 68 65 20 70 72 65 76 | 69 6f 75 73 20 75 6e 74 |the prev|ious unt|
|00002940| 72 61 6e 73 6c 61 74 65 | 64 20 65 6e 74 72 79 2c |ranslate|d entry,|
|00002950| 20 77 72 61 70 70 69 6e | 67 20 61 72 6f 75 6e 64 | wrappin|g around|
|00002960| 20 69 66 20 6e 65 63 65 | 73 73 61 72 79 2e 1f 0a | if nece|ssary...|
|00002970| 28 64 65 66 61 6c 69 61 | 73 20 27 70 6f 2d 70 72 |(defalia|s 'po-pr|
|00002980| 65 76 69 6f 75 73 2d 75 | 6e 74 72 61 6e 73 6c 61 |evious-u|ntransla|
|00002990| 74 65 64 2d 65 6e 74 72 | 79 20 23 5b 6e 69 6c 20 |ted-entr|y #[nil |
|000029a0| 22 c0 09 c2 5c 22 87 22 | 20 5b 70 6f 2d 70 72 65 |"...\"."| [po-pre|
|000029b0| 76 69 6f 75 73 2d 65 6e | 74 72 79 2d 77 69 74 68 |vious-en|try-with|
|000029c0| 2d 72 65 67 65 78 70 20 | 70 6f 2d 65 6d 70 74 79 |-regexp |po-empty|
|000029d0| 2d 6d 73 67 73 74 72 2d | 72 65 67 65 78 70 20 74 |-msgstr-|regexp t|
|000029e0| 5d 20 33 20 28 23 24 20 | 2e 20 31 30 35 33 39 29 |] 3 (#$ |. 10539)|
|000029f0| 20 6e 69 6c 5d 29 0a 23 | 40 36 30 20 52 65 67 65 | nil]).#|@60 Rege|
|00002a00| 78 70 20 6d 61 74 63 68 | 69 6e 67 20 61 20 77 68 |xp match|ing a wh|
|00002a10| 6f 6c 65 20 6d 73 67 73 | 74 72 20 66 69 65 6c 64 |ole msgs|tr field|
|00002a20| 20 6f 66 20 61 6e 20 6f | 62 73 6f 6c 65 74 65 20 | of an o|bsolete |
|00002a30| 65 6e 74 72 79 2e 1f 0a | 28 64 65 66 76 61 72 20 |entry...|(defvar |
|00002a40| 70 6f 2d 6f 62 73 6f 6c | 65 74 65 2d 6d 73 67 73 |po-obsol|ete-msgs|
|00002a50| 74 72 2d 72 65 67 65 78 | 70 20 22 5e 23 5b 20 09 |tr-regex|p "^#[ .|
|00002a60| 5d 2a 6d 73 67 73 74 72 | 2e 2a 5c 6e 5c 5c 28 23 |]*msgstr|.*\n\\(#|
|00002a70| 5b 20 09 5d 2a 5c 22 2e | 2a 5c 6e 5c 5c 29 2a 22 |[ .]*\".|*\n\\)*"|
|00002a80| 20 28 23 24 20 2e 20 31 | 30 37 34 38 29 29 0a 23 | (#$ . 1|0748)).#|
|00002a90| 40 36 31 20 46 69 6e 64 | 20 74 68 65 20 6e 65 78 |@61 Find| the nex|
|00002aa0| 74 20 6f 62 73 6f 6c 65 | 74 65 20 65 6e 74 72 79 |t obsole|te entry|
|00002ab0| 2c 20 77 72 61 70 70 69 | 6e 67 20 61 72 6f 75 6e |, wrappi|ng aroun|
|00002ac0| 64 20 69 66 20 6e 65 63 | 65 73 73 61 72 79 2e 1f |d if nec|essary..|
|00002ad0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 70 6f 2d 6e |.(defali|as 'po-n|
|00002ae0| 65 78 74 2d 6f 62 73 6f | 6c 65 74 65 2d 65 6e 74 |ext-obso|lete-ent|
|00002af0| 72 79 20 23 5b 6e 69 6c | 20 22 c0 09 c2 5c 22 87 |ry #[nil| "...\".|
|00002b00| 22 20 5b 70 6f 2d 6e 65 | 78 74 2d 65 6e 74 72 79 |" [po-ne|xt-entry|
|00002b10| 2d 77 69 74 68 2d 72 65 | 67 65 78 70 20 70 6f 2d |-with-re|gexp po-|
|00002b20| 6f 62 73 6f 6c 65 74 65 | 2d 6d 73 67 73 74 72 2d |obsolete|-msgstr-|
|00002b30| 72 65 67 65 78 70 20 74 | 5d 20 33 20 28 23 24 20 |regexp t|] 3 (#$ |
|00002b40| 2e 20 31 30 39 30 30 29 | 20 6e 69 6c 5d 29 0a 23 |. 10900)| nil]).#|
|00002b50| 40 36 35 20 46 69 6e 64 | 20 74 68 65 20 70 72 65 |@65 Find| the pre|
|00002b60| 76 69 6f 75 73 20 6f 62 | 73 6f 6c 65 74 65 20 65 |vious ob|solete e|
|00002b70| 6e 74 72 79 2c 20 77 72 | 61 70 70 69 6e 67 20 61 |ntry, wr|apping a|
|00002b80| 72 6f 75 6e 64 20 69 66 | 20 6e 65 63 65 73 73 61 |round if| necessa|
|00002b90| 72 79 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |ry...(de|falias '|
|00002ba0| 70 6f 2d 70 72 65 76 69 | 6f 75 73 2d 6f 62 73 6f |po-previ|ous-obso|
|00002bb0| 6c 65 74 65 2d 65 6e 74 | 72 79 20 23 5b 6e 69 6c |lete-ent|ry #[nil|
|00002bc0| 20 22 c0 09 c2 5c 22 87 | 22 20 5b 70 6f 2d 70 72 | "...\".|" [po-pr|
|00002bd0| 65 76 69 6f 75 73 2d 65 | 6e 74 72 79 2d 77 69 74 |evious-e|ntry-wit|
|00002be0| 68 2d 72 65 67 65 78 70 | 20 70 6f 2d 6f 62 73 6f |h-regexp| po-obso|
|00002bf0| 6c 65 74 65 2d 6d 73 67 | 73 74 72 2d 72 65 67 65 |lete-msg|str-rege|
|00002c00| 78 70 20 74 5d 20 33 20 | 28 23 24 20 2e 20 31 31 |xp t] 3 |(#$ . 11|
|00002c10| 30 39 32 29 20 6e 69 6c | 5d 29 0a 23 40 39 36 20 |092) nil|]).#@96 |
|00002c20| 52 65 67 65 78 70 20 6d | 61 74 63 68 69 6e 67 20 |Regexp m|atching |
|00002c30| 74 68 65 20 73 74 72 69 | 6e 67 20 69 6e 73 65 72 |the stri|ng inser|
|00002c40| 74 65 64 20 62 79 20 6d | 73 67 6d 65 72 67 65 20 |ted by m|sgmerge |
|00002c50| 66 6f 72 20 74 72 61 6e | 73 6c 61 74 69 6f 6e 73 |for tran|slations|
|00002c60| 0a 77 68 69 63 68 20 64 | 6f 65 73 20 6e 6f 74 20 |.which d|oes not |
|00002c70| 6d 61 74 63 68 20 65 78 | 61 63 74 6c 79 2e 1f 0a |match ex|actly...|
|00002c80| 28 64 65 66 76 61 72 20 | 70 6f 2d 69 6e 65 78 61 |(defvar |po-inexa|
|00002c90| 63 74 2d 72 65 67 65 78 | 70 20 22 5e 23 21 20 49 |ct-regex|p "^#! I|
|00002ca0| 4e 45 58 41 43 54 22 20 | 28 23 24 20 2e 20 31 31 |NEXACT" |(#$ . 11|
|00002cb0| 32 39 36 29 29 0a 23 40 | 36 30 20 46 69 6e 64 20 |296)).#@|60 Find |
|00002cc0| 74 68 65 20 6e 65 78 74 | 20 69 6e 65 78 61 63 74 |the next| inexact|
|00002cd0| 20 65 6e 74 72 79 2c 20 | 77 72 61 70 70 69 6e 67 | entry, |wrapping|
|00002ce0| 20 61 72 6f 75 6e 64 20 | 69 66 20 6e 65 63 65 73 | around |if neces|
|00002cf0| 73 61 72 79 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |sary...(|defalias|
|00002d00| 20 27 70 6f 2d 6e 65 78 | 74 2d 69 6e 65 78 61 63 | 'po-nex|t-inexac|
|00002d10| 74 20 23 5b 6e 69 6c 20 | 22 c0 09 c2 5c 22 87 22 |t #[nil |"...\"."|
|00002d20| 20 5b 70 6f 2d 6e 65 78 | 74 2d 65 6e 74 72 79 2d | [po-nex|t-entry-|
|00002d30| 77 69 74 68 2d 72 65 67 | 65 78 70 20 70 6f 2d 69 |with-reg|exp po-i|
|00002d40| 6e 65 78 61 63 74 2d 72 | 65 67 65 78 70 20 74 5d |nexact-r|egexp t]|
|00002d50| 20 33 20 28 23 24 20 2e | 20 31 31 34 35 31 29 20 | 3 (#$ .| 11451) |
|00002d60| 6e 69 6c 5d 29 0a 23 40 | 36 30 20 46 69 6e 64 20 |nil]).#@|60 Find |
|00002d70| 74 68 65 20 6e 65 78 74 | 20 69 6e 65 78 61 63 74 |the next| inexact|
|00002d80| 20 65 6e 74 72 79 2c 20 | 77 72 61 70 70 69 6e 67 | entry, |wrapping|
|00002d90| 20 61 72 6f 75 6e 64 20 | 69 66 20 6e 65 63 65 73 | around |if neces|
|00002da0| 73 61 72 79 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |sary...(|defalias|
|00002db0| 20 27 70 6f 2d 70 72 65 | 76 69 6f 75 73 2d 69 6e | 'po-pre|vious-in|
|00002dc0| 65 78 61 63 74 20 23 5b | 6e 69 6c 20 22 c0 09 c2 |exact #[|nil "...|
|00002dd0| 5c 22 87 22 20 5b 70 6f | 2d 70 72 65 76 69 6f 75 |\"." [po|-previou|
|00002de0| 73 2d 65 6e 74 72 79 2d | 77 69 74 68 2d 72 65 67 |s-entry-|with-reg|
|00002df0| 65 78 70 20 70 6f 2d 69 | 6e 65 78 61 63 74 2d 72 |exp po-i|nexact-r|
|00002e00| 65 67 65 78 70 20 74 5d | 20 33 20 28 23 24 20 2e |egexp t]| 3 (#$ .|
|00002e10| 20 31 31 36 32 37 29 20 | 6e 69 6c 5d 29 0a 28 62 | 11627) |nil]).(b|
|00002e20| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 21 83 0e 00 |yte-code| "..!...|
|00002e30| c2 c1 4b 4d 88 82 12 00 | c2 c3 4d 88 c0 87 22 20 |..KM....|..M..." |
|00002e40| 5b 66 62 6f 75 6e 64 70 | 20 6b 69 6c 6c 2d 6e 65 |[fboundp| kill-ne|
|00002e50| 77 20 70 6f 2d 6b 69 6c | 6c 2d 6e 65 77 20 23 5b |w po-kil|l-new #[|
|00002e60| 28 73 74 72 69 6e 67 29 | 20 22 c0 20 88 8a 09 71 |(string)| ". ...q|
|00002e70| 88 c2 20 88 0b 63 88 c4 | 65 64 5c 22 29 87 22 20 |.. ..c..|ed\")." |
|00002e80| 5b 70 6f 2d 63 68 65 63 | 6b 2d 6c 6f 63 6b 20 70 |[po-chec|k-lock p|
|00002e90| 6f 2d 77 6f 72 6b 2d 62 | 75 66 66 65 72 20 65 72 |o-work-b|uffer er|
|00002ea0| 61 73 65 2d 62 75 66 66 | 65 72 20 73 74 72 69 6e |ase-buff|er strin|
|00002eb0| 67 20 6b 69 6c 6c 2d 72 | 65 67 69 6f 6e 5d 20 33 |g kill-r|egion] 3|
|00002ec0| 20 22 50 75 73 68 20 53 | 54 52 49 4e 47 20 6f 6e | "Push S|TRING on|
|00002ed0| 74 6f 20 74 68 65 20 6b | 69 6c 6c 20 72 69 6e 67 |to the k|ill ring|
|00002ee0| 2c 20 66 6f 72 20 45 6d | 61 63 73 20 31 38 20 77 |, for Em|acs 18 w|
|00002ef0| 68 65 72 65 20 6b 69 6c | 6c 2d 6e 65 77 20 69 73 |here kil|l-new is|
|00002f00| 20 6d 69 73 73 69 6e 67 | 2e 22 5d 5d 20 32 29 0a | missing|."]] 2).|
|00002f10| 23 40 31 33 34 20 45 78 | 74 72 61 63 74 20 61 6e |#@134 Ex|tract an|
|00002f20| 64 20 72 65 74 75 72 6e | 20 74 68 65 20 75 6e 71 |d return| the unq|
|00002f30| 75 6f 74 65 64 20 73 74 | 72 69 6e 67 20 69 6e 20 |uoted st|ring in |
|00002f40| 42 55 46 46 45 52 20 67 | 6f 69 6e 67 20 66 72 6f |BUFFER g|oing fro|
|00002f50| 6d 20 53 54 41 52 54 20 | 74 6f 20 45 4e 44 2e 0a |m START |to END..|
|00002f60| 43 72 75 6d 62 20 70 72 | 65 63 65 64 69 6e 67 20 |Crumb pr|eceding |
|00002f70| 6f 72 20 66 6f 6c 6c 6f | 77 69 6e 67 20 74 68 65 |or follo|wing the|
|00002f80| 20 71 75 6f 74 65 64 20 | 73 74 72 69 6e 67 20 69 | quoted |string i|
|00002f90| 73 20 69 67 6e 6f 72 65 | 64 2e 1f 0a 28 64 65 66 |s ignore|d...(def|
|00002fa0| 61 6c 69 61 73 20 27 70 | 6f 2d 65 78 74 72 61 63 |alias 'p|o-extrac|
|00002fb0| 74 2d 75 6e 71 75 6f 74 | 65 64 20 23 5b 28 62 75 |t-unquot|ed #[(bu|
|00002fc0| 66 66 65 72 20 73 74 61 | 72 74 20 65 6e 64 29 20 |ffer sta|rt end) |
|00002fd0| 22 c0 20 88 8a 09 71 88 | c2 20 88 c3 5c 66 0d 0e |". ...q.|. ..\f..|
|00002fe0| 06 23 88 65 62 88 c7 c8 | 21 88 65 60 7c 88 64 62 |.#.eb...|!.e`|.db|
|00002ff0| 88 c9 c8 21 88 60 64 7c | 88 65 62 88 ca cb cc cd |...!.`d||.eb.....|
|00003000| 23 83 3b 00 ce cf cd 89 | 23 88 82 2a 00 65 62 88 |#.;.....|#..*.eb.|
|00003010| ca d0 cc cd 23 83 af 00 | 68 d1 3d 83 55 00 ce c8 |....#...|h.=.U...|
|00003020| cd 89 23 88 82 3e 00 68 | d2 3d 83 64 00 ce d3 cd |..#..>.h|.=.d....|
|00003030| 89 23 88 82 3e 00 68 d4 | 3d 83 73 00 ce d5 cd 89 |.#..>.h.|=.s.....|
|00003040| 23 88 82 3e 00 68 d6 3d | 83 82 00 ce d7 cd 89 23 |#..>.h.=|.......#|
|00003050| 88 82 3e 00 68 d8 3d 83 | 91 00 ce d9 cd 89 23 88 |..>.h.=.|......#.|
|00003060| 82 3e 00 68 da 3d 83 a0 | 00 ce db cd 89 23 88 82 |.>.h.=..|.....#..|
|00003070| 3e 00 68 dc 3d 83 3e 00 | ce dd cd 89 23 88 82 3e |>.h.=.>.|....#..>|
|00003080| 00 de 20 29 87 22 20 5b | 70 6f 2d 63 68 65 63 6b |.. )." [|po-check|
|00003090| 2d 6c 6f 63 6b 20 70 6f | 2d 77 6f 72 6b 2d 62 75 |-lock po|-work-bu|
|000030a0| 66 66 65 72 20 65 72 61 | 73 65 2d 62 75 66 66 65 |ffer era|se-buffe|
|000030b0| 72 20 69 6e 73 65 72 74 | 2d 62 75 66 66 65 72 2d |r insert|-buffer-|
|000030c0| 73 75 62 73 74 72 69 6e | 67 20 62 75 66 66 65 72 |substrin|g buffer|
|000030d0| 20 73 74 61 72 74 20 65 | 6e 64 20 73 65 61 72 63 | start e|nd searc|
|000030e0| 68 2d 66 6f 72 77 61 72 | 64 20 22 5c 22 22 20 73 |h-forwar|d "\"" s|
|000030f0| 65 61 72 63 68 2d 62 61 | 63 6b 77 61 72 64 20 72 |earch-ba|ckward r|
|00003100| 65 2d 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |e-search|-forward|
|00003110| 20 22 5c 22 5b 20 09 5d | 2a 5c 5c 5c 5c 3f 5c 6e | "\"[ .]|*\\\\?\n|
|00003120| 23 3f 5b 20 09 5d 2a 5c | 22 22 20 6e 69 6c 20 74 |#?[ .]*\|"" nil t|
|00003130| 20 72 65 70 6c 61 63 65 | 2d 6d 61 74 63 68 20 22 | replace|-match "|
|00003140| 22 20 22 5c 5c 5c 5c 5b | 5c 5c 5c 22 61 62 66 6e |" "\\\\[|\\\"abfn|
|00003150| 74 5c 5c 5c 5c 5d 22 20 | 33 34 20 39 37 20 22 07 |t\\\\]" |34 97 ".|
|00003160| 22 20 39 38 20 22 08 22 | 20 31 30 32 20 22 5c 66 |" 98 "."| 102 "\f|
|00003170| 22 20 31 31 30 20 22 5c | 6e 22 20 31 31 36 20 22 |" 110 "\|n" 116 "|
|00003180| 09 22 20 39 32 20 22 5c | 5c 22 20 62 75 66 66 65 |." 92 "\|\" buffe|
|00003190| 72 2d 73 74 72 69 6e 67 | 5d 20 34 20 28 23 24 20 |r-string|] 4 (#$ |
|000031a0| 2e 20 31 32 30 35 34 29 | 5d 29 0a 23 40 33 36 34 |. 12054)|]).#@364|
|000031b0| 20 45 76 61 6c 20 46 4f | 52 4d 2c 20 77 68 69 63 | Eval FO|RM, whic|
|000031c0| 68 20 69 6e 73 65 72 74 | 73 20 61 20 73 74 72 69 |h insert|s a stri|
|000031d0| 6e 67 2c 20 61 6e 64 20 | 72 65 74 75 72 6e 20 74 |ng, and |return t|
|000031e0| 68 65 20 73 74 72 69 6e | 67 20 66 75 6c 6c 79 20 |he strin|g fully |
|000031f0| 72 65 71 75 6f 74 65 64 | 2e 0a 49 66 20 50 52 45 |requoted|..If PRE|
|00003200| 46 49 58 2c 20 70 72 65 | 63 65 64 65 20 74 68 65 |FIX, pre|cede the|
|00003210| 20 72 65 73 75 6c 74 20 | 77 69 74 68 20 69 74 73 | result |with its|
|00003220| 20 63 6f 6e 74 65 6e 74 | 73 2e 20 20 49 66 20 4f | content|s.  If O|
|00003230| 42 53 4f 4c 45 54 45 2c | 20 63 6f 6d 6d 65 6e 74 |BSOLETE,| comment|
|00003240| 20 61 6c 6c 0a 67 65 6e | 65 72 61 74 65 64 20 6c | all.gen|erated l|
|00003250| 69 6e 65 73 20 69 6e 20 | 74 68 65 20 72 65 74 75 |ines in |the retu|
|00003260| 72 6e 65 64 20 73 74 72 | 69 6e 67 2e 20 20 45 76 |rned str|ing.  Ev|
|00003270| 61 6c 75 61 74 69 6e 67 | 20 46 4f 52 4d 20 73 68 |aluating| FORM sh|
|00003280| 6f 75 6c 64 20 69 6e 73 | 65 72 74 20 74 68 65 0a |ould ins|ert the.|
|00003290| 77 61 6e 74 65 64 20 73 | 74 72 69 6e 67 20 69 6e |wanted s|tring in|
|000032a0| 20 74 68 65 20 62 75 66 | 66 65 72 20 77 68 69 63 | the buf|fer whic|
|000032b0| 68 20 69 73 20 63 75 72 | 72 65 6e 74 20 61 74 20 |h is cur|rent at |
|000032c0| 74 68 65 20 74 69 6d 65 | 20 6f 66 20 65 76 61 6c |the time| of eval|
|000032d0| 75 61 74 69 6f 6e 2e 0a | 49 66 20 46 4f 52 4d 20 |uation..|If FORM |
|000032e0| 69 73 20 69 74 73 65 6c | 66 20 61 20 73 74 72 69 |is itsel|f a stri|
|000032f0| 6e 67 2c 20 74 68 65 6e | 20 74 68 69 73 20 73 74 |ng, then| this st|
|00003300| 72 69 6e 67 20 69 73 20 | 75 73 65 64 20 66 6f 72 |ring is |used for|
|00003310| 20 69 6e 73 65 72 74 69 | 6f 6e 2e 1f 0a 28 64 65 | inserti|on...(de|
|00003320| 66 61 6c 69 61 73 20 27 | 70 6f 2d 65 76 61 6c 2d |falias '|po-eval-|
|00003330| 72 65 71 75 6f 74 65 64 | 20 23 5b 28 66 6f 72 6d |requoted| #[(form|
|00003340| 20 70 72 65 66 69 78 20 | 6f 62 73 6f 6c 65 74 65 | prefix |obsolete|
|00003350| 29 20 22 c0 20 88 8a 09 | 71 88 c2 20 88 0b 3b 83 |) ". ...|q.. ..;.|
|00003360| 15 00 0b 63 88 82 1c 00 | c4 20 88 c5 0b 21 88 65 |...c....|. ...!.e|
|00003370| 62 88 c6 c7 c8 c9 23 1e | 5c 6e 65 62 88 c6 cb c8 |b.....#.|\neb....|
|00003380| c9 23 83 a7 00 68 cc 3d | 83 40 00 cd ce c9 89 23 |.#...h.=|.@.....#|
|00003390| 88 82 29 00 68 cf 3d 83 | 4f 00 cd d0 c9 89 23 88 |..).h.=.|O.....#.|
|000033a0| 82 29 00 68 d1 3d 83 5e | 00 cd d2 c9 89 23 88 82 |.).h.=.^|.....#..|
|000033b0| 29 00 68 d3 3d 83 6d 00 | cd d4 c9 89 23 88 82 29 |).h.=.m.|....#..)|
|000033c0| 00 68 d5 3d 83 89 00 cd | 0e 5c 6e 83 7d 00 6d 83 |.h.=....|.\n.}.m.|
|000033d0| 81 00 d6 82 82 00 d7 c9 | 89 23 88 82 29 00 68 d8 |........|.#..).h.|
|000033e0| 3d 83 98 00 cd d9 c9 89 | 23 88 82 29 00 68 da 3d |=.......|#..).h.=|
|000033f0| 83 29 00 cd db c9 89 23 | 88 82 29 00 65 62 88 0e |.).....#|..).eb..|
|00003400| 1c 83 b5 00 0e 1c dd b1 | 02 88 0e 5c 6e 83 be 00 |........|...\n...|
|00003410| de 82 bf 00 df 63 88 64 | 62 88 df 63 88 0e 1c 83 |.....c.d|b..c....|
|00003420| cf 00 e0 63 88 0e 21 83 | ec 00 65 62 88 e2 63 88 |...c..!.|..eb..c.|
|00003430| e3 e0 c8 c9 23 83 ec 00 | 6d 84 ec 00 e2 63 88 82 |....#...|m....c..|
|00003440| da 00 e4 20 2a 87 22 20 | 5b 70 6f 2d 63 68 65 63 |... *." |[po-chec|
|00003450| 6b 2d 6c 6f 63 6b 20 70 | 6f 2d 77 6f 72 6b 2d 62 |k-lock p|o-work-b|
|00003460| 75 66 66 65 72 20 65 72 | 61 73 65 2d 62 75 66 66 |uffer er|ase-buff|
|00003470| 65 72 20 66 6f 72 6d 20 | 70 75 73 68 2d 6d 61 72 |er form |push-mar|
|00003480| 6b 20 65 76 61 6c 20 72 | 65 2d 73 65 61 72 63 68 |k eval r|e-search|
|00003490| 2d 66 6f 72 77 61 72 64 | 20 22 5b 5e 5c 6e 5d 5c |-forward| "[^\n]\|
|000034a0| 6e 2b 5b 5e 5c 6e 5d 22 | 20 6e 69 6c 20 74 20 6d |n+[^\n]"| nil t m|
|000034b0| 75 6c 74 69 2d 6c 69 6e | 65 20 22 5b 5c 5c 5c 22 |ulti-lin|e "[\\\"|
|000034c0| 07 08 5c 66 5c 6e 09 5c | 5c 5c 5c 5d 22 20 33 34 |..\f\n.\|\\\]" 34|
|000034d0| 20 72 65 70 6c 61 63 65 | 2d 6d 61 74 63 68 20 22 | replace|-match "|
|000034e0| 5c 5c 5c 22 22 20 37 20 | 22 5c 5c 61 22 20 38 20 |\\\"" 7 |"\\a" 8 |
|000034f0| 22 5c 5c 62 22 20 31 32 | 20 22 5c 5c 66 22 20 31 |"\\b" 12| "\\f" 1|
|00003500| 30 20 22 5c 5c 6e 22 20 | 22 5c 5c 6e 5c 22 5c 6e |0 "\\n" |"\\n\"\n|
|00003510| 5c 22 22 20 39 20 22 5c | 5c 74 22 20 39 32 20 22 |\"" 9 "\|\t" 92 "|
|00003520| 5c 5c 5c 5c 22 20 70 72 | 65 66 69 78 20 22 20 22 |\\\\" pr|efix " "|
|00003530| 20 22 5c 22 5c 22 5c 6e | 5c 22 22 20 22 5c 22 22 | "\"\"\n|\"" "\""|
|00003540| 20 22 5c 6e 22 20 6f 62 | 73 6f 6c 65 74 65 20 22 | "\n" ob|solete "|
|00003550| 23 20 22 20 73 65 61 72 | 63 68 2d 66 6f 72 77 61 |# " sear|ch-forwa|
|00003560| 72 64 20 62 75 66 66 65 | 72 2d 73 74 72 69 6e 67 |rd buffe|r-string|
|00003570| 5d 20 34 20 28 23 24 20 | 2e 20 31 32 37 32 31 29 |] 4 (#$ |. 12721)|
|00003580| 5d 29 0a 23 40 31 33 32 | 20 45 78 74 72 61 63 74 |]).#@132| Extract|
|00003590| 20 61 6e 64 20 72 65 74 | 75 72 6e 20 74 68 65 20 | and ret|urn the |
|000035a0| 75 6e 71 75 6f 74 65 64 | 20 6d 73 67 73 74 72 20 |unquoted| msgstr |
|000035b0| 73 74 72 69 6e 67 2c 20 | 75 6e 6c 65 73 73 20 4d |string, |unless M|
|000035c0| 53 47 49 44 20 73 65 6c | 65 63 74 73 20 6d 73 67 |SGID sel|ects msg|
|000035d0| 69 64 2e 0a 49 66 20 4b | 49 4c 4c 2c 20 74 68 65 |id..If K|ILL, the|
|000035e0| 6e 20 61 64 64 20 74 68 | 65 20 75 6e 71 75 6f 74 |n add th|e unquot|
|000035f0| 65 64 20 73 74 72 69 6e | 67 20 74 6f 20 74 68 65 |ed strin|g to the|
|00003600| 20 6b 69 6c 6c 20 72 69 | 6e 67 2e 1f 0a 28 64 65 | kill ri|ng...(de|
|00003610| 66 61 6c 69 61 73 20 27 | 70 6f 2d 67 65 74 2d 66 |falias '|po-get-f|
|00003620| 69 65 6c 64 20 23 5b 28 | 6d 73 67 69 64 20 6b 69 |ield #[(|msgid ki|
|00003630| 6c 6c 29 20 22 08 83 19 | 00 8a 09 62 88 c2 0b 5c |ll) "...|...b...\|
|00003640| 66 c5 23 88 29 c6 70 c7 | 94 c7 95 23 82 1f 00 c6 |f.#.).p.|...#....|
|00003650| 70 0e 08 5c 66 23 1e 09 | 0e 5c 6e 83 2b 00 cb 0e |p..\f#..|.\n.+...|
|00003660| 09 21 88 0e 09 29 87 22 | 20 5b 6d 73 67 69 64 20 |.!...)."| [msgid |
|00003670| 70 6f 2d 73 74 61 72 74 | 2d 6f 66 2d 65 6e 74 72 |po-start|-of-entr|
|00003680| 79 20 72 65 2d 73 65 61 | 72 63 68 2d 66 6f 72 77 |y re-sea|rch-forw|
|00003690| 61 72 64 20 70 6f 2d 61 | 6e 79 2d 6d 73 67 69 64 |ard po-a|ny-msgid|
|000036a0| 2d 72 65 67 65 78 70 20 | 70 6f 2d 65 6e 64 2d 6f |-regexp |po-end-o|
|000036b0| 66 2d 65 6e 74 72 79 20 | 74 20 70 6f 2d 65 78 74 |f-entry |t po-ext|
|000036c0| 72 61 63 74 2d 75 6e 71 | 75 6f 74 65 64 20 30 20 |ract-unq|uoted 0 |
|000036d0| 70 6f 2d 6d 69 64 64 6c | 65 2d 6f 66 2d 65 6e 74 |po-middl|e-of-ent|
|000036e0| 72 79 20 73 74 72 69 6e | 67 20 6b 69 6c 6c 20 70 |ry strin|g kill p|
|000036f0| 6f 2d 6b 69 6c 6c 2d 6e | 65 77 5d 20 34 20 28 23 |o-kill-n|ew] 4 (#|
|00003700| 24 20 2e 20 31 33 37 30 | 35 29 5d 29 0a 23 40 33 |$ . 1370|5)]).#@3|
|00003710| 34 33 20 52 65 70 6c 61 | 63 65 20 74 68 65 20 63 |43 Repla|ce the c|
|00003720| 75 72 72 65 6e 74 20 6d | 73 67 73 74 72 2c 20 75 |urrent m|sgstr, u|
|00003730| 6e 6c 65 73 73 20 4d 53 | 47 49 44 2c 20 75 73 69 |nless MS|GID, usi|
|00003740| 6e 67 20 46 4f 52 4d 20 | 74 6f 20 67 65 74 20 61 |ng FORM |to get a|
|00003750| 20 73 74 72 69 6e 67 2e | 0a 49 66 20 4d 53 47 49 | string.|.If MSGI|
|00003760| 44 20 69 73 20 74 72 75 | 65 2c 20 72 65 70 6c 61 |D is tru|e, repla|
|00003770| 63 65 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 6d |ce the c|urrent m|
|00003780| 73 67 69 64 20 69 6e 73 | 74 65 61 64 2e 20 20 49 |sgid ins|tead.  I|
|00003790| 6e 20 65 69 74 68 65 72 | 20 63 61 73 65 2c 0a 65 |n either| case,.e|
|000037a0| 76 61 6c 75 61 74 69 6e | 67 20 46 4f 52 4d 20 73 |valuatin|g FORM s|
|000037b0| 68 6f 75 6c 64 20 69 6e | 73 65 72 74 20 74 68 65 |hould in|sert the|
|000037c0| 20 77 61 6e 74 65 64 20 | 73 74 72 69 6e 67 20 69 | wanted |string i|
|000037d0| 6e 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 62 75 |n the cu|rrent bu|
|000037e0| 66 66 65 72 2e 0a 49 66 | 20 46 4f 52 4d 20 69 73 |ffer..If| FORM is|
|000037f0| 20 69 74 73 65 6c 66 20 | 61 20 73 74 72 69 6e 67 | itself |a string|
|00003800| 2c 20 74 68 65 6e 20 74 | 68 69 73 20 73 74 72 69 |, then t|his stri|
|00003810| 6e 67 20 69 73 20 75 73 | 65 64 20 66 6f 72 20 69 |ng is us|ed for i|
|00003820| 6e 73 65 72 74 69 6f 6e | 2e 0a 54 68 65 20 73 74 |nsertion|..The st|
|00003830| 72 69 6e 67 20 69 73 20 | 70 72 6f 70 65 72 6c 79 |ring is |properly|
|00003840| 20 72 65 71 75 6f 74 65 | 64 20 62 65 66 6f 72 65 | requote|d before|
|00003850| 20 74 68 65 20 72 65 70 | 6c 61 63 65 6d 65 6e 74 | the rep|lacement|
|00003860| 20 6f 63 63 75 72 73 2e | 1f 0a 28 64 65 66 61 6c | occurs.|..(defal|
|00003870| 69 61 73 20 27 70 6f 2d | 73 65 74 2d 66 69 65 6c |ias 'po-|set-fiel|
|00003880| 64 20 23 5b 28 6d 73 67 | 69 64 20 66 6f 72 6d 29 |d #[(msg|id form)|
|00003890| 20 22 c0 09 5c 6e 83 5c | 6e 00 c3 82 0b 00 c4 0d | "..\n.\|n.......|
|000038a0| 23 1e 06 8a 0e 07 62 88 | c8 5c 6e 83 1e 00 0e 09 |#.....b.|.\n.....|
|000038b0| 82 20 00 0e 5c 6e 0e 0b | 5c 22 88 cc 94 cc 95 7b |. ..\n..|\".....{|
|000038c0| 0e 06 98 84 3d 00 cd 1e | 0e cf 0e 06 d0 89 23 88 |....=...|......#.|
|000038d0| d0 16 11 29 5c 6e 83 51 | 00 c8 0e 5c 6e 21 88 cc |...)\n.Q|...\n!..|
|000038e0| 94 16 12 cc 95 16 0b 82 | 54 00 60 16 0b 2a d3 20 |........|T.`..*. |
|000038f0| 87 22 20 5b 70 6f 2d 65 | 76 61 6c 2d 72 65 71 75 |." [po-e|val-requ|
|00003900| 6f 74 65 64 20 66 6f 72 | 6d 20 6d 73 67 69 64 20 |oted for|m msgid |
|00003910| 22 6d 73 67 69 64 22 20 | 22 6d 73 67 73 74 72 22 |"msgid" |"msgstr"|
|00003920| 20 70 6f 2d 6f 62 73 6f | 6c 65 74 65 2d 66 6c 61 | po-obso|lete-fla|
|00003930| 67 20 73 74 72 69 6e 67 | 20 70 6f 2d 73 74 61 72 |g string| po-star|
|00003940| 74 2d 6f 66 2d 65 6e 74 | 72 79 20 72 65 2d 73 65 |t-of-ent|ry re-se|
|00003950| 61 72 63 68 2d 66 6f 72 | 77 61 72 64 20 70 6f 2d |arch-for|ward po-|
|00003960| 61 6e 79 2d 6d 73 67 69 | 64 2d 72 65 67 65 78 70 |any-msgi|d-regexp|
|00003970| 20 70 6f 2d 61 6e 79 2d | 6d 73 67 73 74 72 2d 72 | po-any-|msgstr-r|
|00003980| 65 67 65 78 70 20 70 6f | 2d 65 6e 64 2d 6f 66 2d |egexp po|-end-of-|
|00003990| 65 6e 74 72 79 20 30 20 | 6e 69 6c 20 62 75 66 66 |entry 0 |nil buff|
|000039a0| 65 72 2d 72 65 61 64 2d | 6f 6e 6c 79 20 72 65 70 |er-read-|only rep|
|000039b0| 6c 61 63 65 2d 6d 61 74 | 63 68 20 74 20 70 6f 2d |lace-mat|ch t po-|
|000039c0| 6f 66 66 65 72 2d 76 61 | 6c 69 64 61 74 69 6f 6e |offer-va|lidation|
|000039d0| 20 70 6f 2d 6d 69 64 64 | 6c 65 2d 6f 66 2d 65 6e | po-midd|le-of-en|
|000039e0| 74 72 79 20 70 6f 2d 72 | 65 64 69 73 70 6c 61 79 |try po-r|edisplay|
|000039f0| 5d 20 34 20 28 23 24 20 | 2e 20 31 34 30 39 39 29 |] 4 (#$ |. 14099)|
|00003a00| 5d 29 0a 23 40 36 31 20 | 50 75 73 68 20 74 68 65 |]).#@61 |Push the|
|00003a10| 20 6d 73 67 73 74 72 20 | 73 74 72 69 6e 67 20 66 | msgstr |string f|
|00003a20| 72 6f 6d 20 63 75 72 72 | 65 6e 74 20 65 6e 74 72 |rom curr|ent entr|
|00003a30| 79 20 6f 6e 20 74 68 65 | 20 6b 69 6c 6c 20 72 69 |y on the| kill ri|
|00003a40| 6e 67 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |ng...(de|falias '|
|00003a50| 70 6f 2d 6b 69 6c 6c 2d | 72 69 6e 67 2d 73 61 76 |po-kill-|ring-sav|
|00003a60| 65 2d 6d 73 67 73 74 72 | 20 23 5b 6e 69 6c 20 22 |e-msgstr| #[nil "|
|00003a70| c0 20 88 c1 c2 c3 5c 22 | 87 22 20 5b 70 6f 2d 66 |. ....\"|." [po-f|
|00003a80| 69 6e 64 2d 73 70 61 6e | 2d 6f 66 2d 65 6e 74 72 |ind-span|-of-entr|
|00003a90| 79 20 70 6f 2d 67 65 74 | 2d 66 69 65 6c 64 20 6e |y po-get|-field n|
|00003aa0| 69 6c 20 74 5d 20 33 20 | 28 23 24 20 2e 20 31 34 |il t] 3 |(#$ . 14|
|00003ab0| 38 35 36 29 20 6e 69 6c | 5d 29 0a 23 40 37 34 20 |856) nil|]).#@74 |
|00003ac0| 45 6d 70 74 79 20 74 68 | 65 20 6d 73 67 73 74 72 |Empty th|e msgstr|
|00003ad0| 20 73 74 72 69 6e 67 20 | 66 72 6f 6d 20 63 75 72 | string |from cur|
|00003ae0| 72 65 6e 74 20 65 6e 74 | 72 79 2c 20 70 75 73 68 |rent ent|ry, push|
|00003af0| 69 6e 67 20 69 74 20 6f | 6e 20 74 68 65 20 6b 69 |ing it o|n the ki|
|00003b00| 6c 6c 20 72 69 6e 67 2e | 1f 0a 28 64 65 66 61 6c |ll ring.|..(defal|
|00003b10| 69 61 73 20 27 70 6f 2d | 6b 69 6c 6c 2d 6d 73 67 |ias 'po-|kill-msg|
|00003b20| 73 74 72 20 23 5b 6e 69 | 6c 20 22 c0 20 88 c1 c2 |str #[ni|l ". ...|
|00003b30| c3 5c 22 88 c4 20 87 22 | 20 5b 70 6f 2d 6b 69 6c |.\".. ."| [po-kil|
|00003b40| 6c 2d 72 69 6e 67 2d 73 | 61 76 65 2d 6d 73 67 73 |l-ring-s|ave-msgs|
|00003b50| 74 72 20 70 6f 2d 73 65 | 74 2d 66 69 65 6c 64 20 |tr po-se|t-field |
|00003b60| 6e 69 6c 20 22 22 20 70 | 6f 2d 72 65 64 69 73 70 |nil "" p|o-redisp|
|00003b70| 6c 61 79 5d 20 33 20 28 | 23 24 20 2e 20 31 35 30 |lay] 3 (|#$ . 150|
|00003b80| 34 30 29 20 6e 69 6c 5d | 29 0a 23 40 36 34 20 52 |40) nil]|).#@64 R|
|00003b90| 65 70 6c 61 63 65 20 74 | 68 65 20 63 75 72 72 65 |eplace t|he curre|
|00003ba0| 6e 74 20 6d 73 67 73 74 | 72 20 73 74 72 69 6e 67 |nt msgst|r string|
|00003bb0| 20 62 79 20 74 68 65 20 | 74 6f 70 20 6f 66 20 74 | by the |top of t|
|00003bc0| 68 65 20 6b 69 6c 6c 20 | 72 69 6e 67 2e 1f 0a 28 |he kill |ring...(|
|00003bd0| 64 65 66 61 6c 69 61 73 | 20 27 70 6f 2d 79 61 6e |defalias| 'po-yan|
|00003be0| 6b 2d 6d 73 67 73 74 72 | 20 23 5b 6e 69 6c 20 22 |k-msgstr| #[nil "|
|00003bf0| c0 20 88 c1 c2 0b c4 3d | 83 0f 00 c5 82 10 00 c6 |. .....=|........|
|00003c00| 5c 22 88 c4 16 07 c8 20 | 87 22 20 5b 70 6f 2d 66 |\"..... |." [po-f|
|00003c10| 69 6e 64 2d 73 70 61 6e | 2d 6f 66 2d 65 6e 74 72 |ind-span|-of-entr|
|00003c20| 79 20 70 6f 2d 73 65 74 | 2d 66 69 65 6c 64 20 6e |y po-set|-field n|
|00003c30| 69 6c 20 6c 61 73 74 2d | 63 6f 6d 6d 61 6e 64 20 |il last-|command |
|00003c40| 79 61 6e 6b 20 28 79 61 | 6e 6b 2d 70 6f 70 20 31 |yank (ya|nk-pop 1|
|00003c50| 29 20 28 79 61 6e 6b 29 | 20 74 68 69 73 2d 63 6f |) (yank)| this-co|
|00003c60| 6d 6d 61 6e 64 20 70 6f | 2d 72 65 64 69 73 70 6c |mmand po|-redispl|
|00003c70| 61 79 5d 20 34 20 28 23 | 24 20 2e 20 31 35 32 34 |ay] 4 (#|$ . 1524|
|00003c80| 37 29 20 6e 69 6c 5d 29 | 0a 23 40 36 31 20 52 65 |7) nil])|.#@61 Re|
|00003c90| 70 6c 61 63 65 20 74 68 | 65 20 63 75 72 72 65 6e |place th|e curren|
|00003ca0| 74 20 6d 73 67 73 74 72 | 20 77 69 74 68 20 61 20 |t msgstr| with a |
|00003cb0| 63 6f 70 79 20 6f 66 20 | 74 68 65 20 6d 73 67 69 |copy of |the msgi|
|00003cc0| 64 20 73 74 72 69 6e 67 | 2e 1f 0a 28 64 65 66 61 |d string|...(defa|
|00003cd0| 6c 69 61 73 20 27 70 6f | 2d 6d 73 67 69 64 2d 74 |lias 'po|-msgid-t|
|00003ce0| 6f 2d 6d 73 67 73 74 72 | 20 23 5b 6e 69 6c 20 22 |o-msgstr| #[nil "|
|00003cf0| c0 20 88 c1 c2 c3 c4 c2 | 5c 22 5c 22 88 c5 20 87 |. ......|\"\".. .|
|00003d00| 22 20 5b 70 6f 2d 66 69 | 6e 64 2d 73 70 61 6e 2d |" [po-fi|nd-span-|
|00003d10| 6f 66 2d 65 6e 74 72 79 | 20 70 6f 2d 73 65 74 2d |of-entry| po-set-|
|00003d20| 66 69 65 6c 64 20 6e 69 | 6c 20 70 6f 2d 67 65 74 |field ni|l po-get|
|00003d30| 2d 66 69 65 6c 64 20 74 | 20 70 6f 2d 72 65 64 69 |-field t| po-redi|
|00003d40| 73 70 6c 61 79 5d 20 35 | 20 28 23 24 20 2e 20 31 |splay] 5| (#$ . 1|
|00003d50| 35 35 30 32 29 20 6e 69 | 6c 5d 29 0a 23 40 31 34 |5502) ni|l]).#@14|
|00003d60| 30 20 4f 62 73 6f 6c 65 | 74 65 20 61 6e 20 61 63 |0 Obsole|te an ac|
|00003d70| 74 69 76 65 20 65 6e 74 | 72 79 2c 20 6f 72 20 63 |tive ent|ry, or c|
|00003d80| 6f 6d 70 6c 65 74 65 6c | 79 20 64 65 6c 65 74 65 |ompletel|y delete|
|00003d90| 20 61 6e 20 6f 62 73 6f | 6c 65 74 65 20 65 6e 74 | an obso|lete ent|
|00003da0| 72 79 2e 0a 57 68 65 6e | 20 61 6e 20 65 6e 74 72 |ry..When| an entr|
|00003db0| 79 20 69 73 20 63 6f 6d | 70 6c 65 74 65 6c 79 20 |y is com|pletely |
|00003dc0| 64 65 6c 65 74 65 64 2c | 20 69 74 73 20 6d 73 67 |deleted,| its msg|
|00003dd0| 73 74 72 20 69 73 20 70 | 75 74 20 6f 6e 20 74 68 |str is p|ut on th|
|00003de0| 65 20 6b 69 6c 6c 20 72 | 69 6e 67 2e 1f 0a 28 64 |e kill r|ing...(d|
|00003df0| 65 66 61 6c 69 61 73 20 | 27 70 6f 2d 66 61 64 65 |efalias |'po-fade|
|00003e00| 2d 6f 75 74 2d 65 6e 74 | 72 79 20 23 5b 6e 69 6c |-out-ent|ry #[nil|
|00003e10| 20 22 c0 20 88 c1 20 88 | 5c 6e 83 37 00 c3 c4 c5 | ". .. .|\n.7....|
|00003e20| 5c 22 88 c4 1e 06 0e 07 | 0e 08 7c 88 29 0e 07 62 |\"......|..|.)..b|
|00003e30| 88 c9 0e 5c 6e c4 c5 23 | 83 2d 00 cb 94 62 88 82 |...\n..#|.-...b..|
|00003e40| 34 00 cc 0e 5c 6e c4 c5 | 23 88 cd 20 87 8a 8c 0e |4...\n..|#.. ....|
|00003e50| 07 0e 08 7d 88 c4 1e 06 | 65 62 88 6d 84 59 00 67 |...}....|eb.m.Y.g|
|00003e60| ce 3d 84 52 00 cf 63 88 | d0 d1 21 88 82 45 00 2b |.=.R..c.|..!..E.+|
|00003e70| c5 89 12 87 22 20 5b 70 | 6f 2d 63 68 65 63 6b 2d |...." [p|o-check-|
|00003e80| 6c 6f 63 6b 20 70 6f 2d | 66 69 6e 64 2d 73 70 61 |lock po-|find-spa|
|00003e90| 6e 2d 6f 66 2d 65 6e 74 | 72 79 20 70 6f 2d 6f 62 |n-of-ent|ry po-ob|
|00003ea0| 73 6f 6c 65 74 65 2d 66 | 6c 61 67 20 70 6f 2d 67 |solete-f|lag po-g|
|00003eb0| 65 74 2d 66 69 65 6c 64 | 20 6e 69 6c 20 74 20 62 |et-field| nil t b|
|00003ec0| 75 66 66 65 72 2d 72 65 | 61 64 2d 6f 6e 6c 79 20 |uffer-re|ad-only |
|00003ed0| 70 6f 2d 73 74 61 72 74 | 2d 6f 66 2d 65 6e 74 72 |po-start|-of-entr|
|00003ee0| 79 20 70 6f 2d 65 6e 64 | 2d 6f 66 2d 65 6e 74 72 |y po-end|-of-entr|
|00003ef0| 79 20 72 65 2d 73 65 61 | 72 63 68 2d 66 6f 72 77 |y re-sea|rch-forw|
|00003f00| 61 72 64 20 70 6f 2d 61 | 6e 79 2d 6d 73 67 73 74 |ard po-a|ny-msgst|
|00003f10| 72 2d 72 65 67 65 78 70 | 20 30 20 72 65 2d 73 65 |r-regexp| 0 re-se|
|00003f20| 61 72 63 68 2d 62 61 63 | 6b 77 61 72 64 20 70 6f |arch-bac|kward po|
|00003f30| 2d 63 75 72 72 65 6e 74 | 2d 65 6e 74 72 79 20 31 |-current|-entry 1|
|00003f40| 30 20 22 23 20 22 20 73 | 65 61 72 63 68 2d 66 6f |0 "# " s|earch-fo|
|00003f50| 72 77 61 72 64 20 22 5c | 6e 22 5d 20 34 20 28 23 |rward "\|n"] 4 (#|
|00003f60| 24 20 2e 20 31 35 37 31 | 34 29 20 6e 69 6c 5d 29 |$ . 1571|4) nil])|
|00003f70| 0a 23 40 36 39 20 52 65 | 67 65 78 70 20 6d 61 74 |.#@69 Re|gexp mat|
|00003f80| 63 68 69 6e 67 20 74 68 | 65 20 77 68 6f 6c 65 20 |ching th|e whole |
|00003f90| 65 64 69 74 61 62 6c 65 | 20 63 6f 6d 6d 65 6e 74 |editable| comment|
|00003fa0| 20 70 61 72 74 20 6f 66 | 20 61 6e 20 61 63 74 69 | part of| an acti|
|00003fb0| 76 65 20 65 6e 74 72 79 | 2e 1f 0a 28 64 65 66 76 |ve entry|...(defv|
|00003fc0| 61 72 20 70 6f 2d 61 63 | 74 69 76 65 2d 63 6f 6d |ar po-ac|tive-com|
|00003fd0| 6d 65 6e 74 2d 72 65 67 | 65 78 70 20 22 5e 5c 5c |ment-reg|exp "^\\|
|00003fe0| 28 23 5c 6e 5c 5c 7c 23 | 20 2e 2a 5c 6e 5c 5c 29 |(#\n\\|#| .*\n\\)|
|00003ff0| 2b 22 20 28 23 24 20 2e | 20 31 36 32 34 36 29 29 |+" (#$ .| 16246))|
|00004000| 0a 23 40 37 31 20 52 65 | 67 65 78 70 20 6d 61 74 |.#@71 Re|gexp mat|
|00004010| 63 68 69 6e 67 20 74 68 | 65 20 77 68 6f 6c 65 20 |ching th|e whole |
|00004020| 65 64 69 74 61 62 6c 65 | 20 63 6f 6d 6d 65 6e 74 |editable| comment|
|00004030| 20 70 61 72 74 20 6f 66 | 20 61 6e 20 6f 62 73 6f | part of| an obso|
|00004040| 6c 65 74 65 20 65 6e 74 | 72 79 2e 1f 0a 28 64 65 |lete ent|ry...(de|
|00004050| 66 76 61 72 20 70 6f 2d | 6f 62 73 6f 6c 65 74 65 |fvar po-|obsolete|
|00004060| 2d 63 6f 6d 6d 65 6e 74 | 2d 72 65 67 65 78 70 20 |-comment|-regexp |
|00004070| 22 5e 5c 5c 28 23 20 23 | 5c 6e 5c 5c 7c 23 20 23 |"^\\(# #|\n\\|# #|
|00004080| 20 2e 2a 5c 6e 5c 5c 29 | 2b 22 20 28 23 24 20 2e | .*\n\\)|+" (#$ .|
|00004090| 20 31 36 33 39 30 29 29 | 0a 23 40 31 32 34 20 45 | 16390))|.#@124 E|
|000040a0| 78 74 72 61 63 74 20 61 | 6e 64 20 72 65 74 75 72 |xtract a|nd retur|
|000040b0| 6e 20 74 68 65 20 65 64 | 69 74 61 62 6c 65 20 63 |n the ed|itable c|
|000040c0| 6f 6d 6d 65 6e 74 20 73 | 74 72 69 6e 67 2c 20 75 |omment s|tring, u|
|000040d0| 6e 63 6f 6d 6d 65 6e 74 | 65 64 2e 0a 49 66 20 4b |ncomment|ed..If K|
|000040e0| 49 4c 4c 2d 46 4c 41 47 | 2c 20 74 68 65 6e 20 61 |ILL-FLAG|, then a|
|000040f0| 64 64 20 74 68 65 20 75 | 6e 71 75 6f 74 65 64 20 |dd the u|nquoted |
|00004100| 63 6f 6d 6d 65 6e 74 20 | 74 6f 20 74 68 65 20 6b |comment |to the k|
|00004110| 69 6c 6c 20 72 69 6e 67 | 2e 1f 0a 28 64 65 66 61 |ill ring|...(defa|
|00004120| 6c 69 61 73 20 27 70 6f | 2d 67 65 74 2d 63 6f 6d |lias 'po|-get-com|
|00004130| 6d 65 6e 74 20 23 5b 28 | 6b 69 6c 6c 2d 66 6c 61 |ment #[(|kill-fla|
|00004140| 67 29 20 22 c0 20 88 70 | 09 1a 1b 8a 5c 66 62 88 |g) ". .p|....\fb.|
|00004150| c5 5c 6e 83 15 00 0e 06 | 82 17 00 0e 07 0e 08 c9 |.\n.....|........|
|00004160| 23 83 5d 00 0e 5c 6e 71 | 88 cb 20 88 cc 0b cd 94 |#.]..\nq|.. .....|
|00004170| cd 95 23 88 65 62 88 6d | 84 4e 00 ce 5c 6e 83 3d |..#.eb.m|.N..\n.=|
|00004180| 00 cf 82 3e 00 d0 21 83 | 48 00 d1 d2 c9 89 23 88 |...>..!.|H.....#.|
|00004190| d3 79 88 82 30 00 0e 14 | 83 58 00 d5 65 64 5c 22 |.y..0...|.X..ed\"|
|000041a0| 88 d6 20 82 5e 00 d2 2b | 87 22 20 5b 70 6f 2d 63 |.. .^..+|." [po-c|
|000041b0| 68 65 63 6b 2d 6c 6f 63 | 6b 20 70 6f 2d 6f 62 73 |heck-loc|k po-obs|
|000041c0| 6f 6c 65 74 65 2d 66 6c | 61 67 20 6f 62 73 6f 6c |olete-fl|ag obsol|
|000041d0| 65 74 65 20 62 75 66 66 | 65 72 20 70 6f 2d 73 74 |ete buff|er po-st|
|000041e0| 61 72 74 2d 6f 66 2d 65 | 6e 74 72 79 20 72 65 2d |art-of-e|ntry re-|
|000041f0| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 70 |search-f|orward p|
|00004200| 6f 2d 6f 62 73 6f 6c 65 | 74 65 2d 63 6f 6d 6d 65 |o-obsole|te-comme|
|00004210| 6e 74 2d 72 65 67 65 78 | 70 20 70 6f 2d 61 63 74 |nt-regex|p po-act|
|00004220| 69 76 65 2d 63 6f 6d 6d | 65 6e 74 2d 72 65 67 65 |ive-comm|ent-rege|
|00004230| 78 70 20 70 6f 2d 65 6e | 64 2d 6f 66 2d 65 6e 74 |xp po-en|d-of-ent|
|00004240| 72 79 20 74 20 70 6f 2d | 77 6f 72 6b 2d 62 75 66 |ry t po-|work-buf|
|00004250| 66 65 72 20 65 72 61 73 | 65 2d 62 75 66 66 65 72 |fer eras|e-buffer|
|00004260| 20 69 6e 73 65 72 74 2d | 62 75 66 66 65 72 2d 73 | insert-|buffer-s|
|00004270| 75 62 73 74 72 69 6e 67 | 20 30 20 6c 6f 6f 6b 69 |ubstring| 0 looki|
|00004280| 6e 67 2d 61 74 20 22 23 | 20 23 20 3f 22 20 22 23 |ng-at "#| # ?" "#|
|00004290| 20 3f 22 20 72 65 70 6c | 61 63 65 2d 6d 61 74 63 | ?" repl|ace-matc|
|000042a0| 68 20 22 22 20 31 20 6b | 69 6c 6c 2d 66 6c 61 67 |h "" 1 k|ill-flag|
|000042b0| 20 63 6f 70 79 2d 72 65 | 67 69 6f 6e 2d 61 73 2d | copy-re|gion-as-|
|000042c0| 6b 69 6c 6c 20 62 75 66 | 66 65 72 2d 73 74 72 69 |kill buf|fer-stri|
|000042d0| 6e 67 5d 20 34 20 28 23 | 24 20 2e 20 31 36 35 34 |ng] 4 (#|$ . 1654|
|000042e0| 33 29 5d 29 0a 23 40 32 | 37 32 20 55 73 69 6e 67 |3)]).#@2|72 Using|
|000042f0| 20 46 4f 52 4d 20 74 6f | 20 67 65 74 20 61 20 73 | FORM to| get a s|
|00004300| 74 72 69 6e 67 2c 20 72 | 65 70 6c 61 63 65 20 74 |tring, r|eplace t|
|00004310| 68 65 20 63 75 72 72 65 | 6e 74 20 65 64 69 74 61 |he curre|nt edita|
|00004320| 62 6c 65 20 63 6f 6d 6d | 65 6e 74 2e 0a 45 76 61 |ble comm|ent..Eva|
|00004330| 6c 75 61 74 69 6e 67 20 | 46 4f 52 4d 20 73 68 6f |luating |FORM sho|
|00004340| 75 6c 64 20 69 6e 73 65 | 72 74 20 74 68 65 20 77 |uld inse|rt the w|
|00004350| 61 6e 74 65 64 20 73 74 | 72 69 6e 67 20 69 6e 20 |anted st|ring in |
|00004360| 74 68 65 20 63 75 72 72 | 65 6e 74 20 62 75 66 66 |the curr|ent buff|
|00004370| 65 72 2e 0a 49 66 20 46 | 4f 52 4d 20 69 73 20 69 |er..If F|ORM is i|
|00004380| 74 73 65 6c 66 20 61 20 | 73 74 72 69 6e 67 2c 20 |tself a |string, |
|00004390| 74 68 65 6e 20 74 68 69 | 73 20 73 74 72 69 6e 67 |then thi|s string|
|000043a0| 20 69 73 20 75 73 65 64 | 20 66 6f 72 20 69 6e 73 | is used| for ins|
|000043b0| 65 72 74 69 6f 6e 2e 0a | 54 68 65 20 73 74 72 69 |ertion..|The stri|
|000043c0| 6e 67 20 69 73 20 70 72 | 6f 70 65 72 6c 79 20 72 |ng is pr|operly r|
|000043d0| 65 63 6f 6d 6d 65 6e 74 | 65 64 20 62 65 66 6f 72 |ecomment|ed befor|
|000043e0| 65 20 74 68 65 20 72 65 | 70 6c 61 63 65 6d 65 6e |e the re|placemen|
|000043f0| 74 20 6f 63 63 75 72 73 | 2e 1f 0a 28 64 65 66 61 |t occurs|...(defa|
|00004400| 6c 69 61 73 20 27 70 6f | 2d 73 65 74 2d 63 6f 6d |lias 'po|-set-com|
|00004410| 6d 65 6e 74 20 23 5b 28 | 66 6f 72 6d 29 20 22 c0 |ment #[(|form) ".|
|00004420| 20 88 70 09 c2 1b 1c 1d | 8a 0e 06 71 88 c7 20 88 | .p.....|...q.. .|
|00004430| 0e 08 3b 83 1e 00 0e 08 | 63 88 82 26 00 c9 20 88 |..;.....|c..&.. .|
|00004440| ca 0e 08 21 88 6f 84 33 | 00 68 cb 55 84 33 00 cc |...!.o.3|.h.U.3..|
|00004450| 63 88 65 62 88 6d 84 5e | 00 67 cb 55 83 4c 00 5c |c.eb.m.^|.g.U.L.\|
|00004460| 66 83 48 00 cd 82 55 00 | ce 82 55 00 5c 66 83 54 |f.H...U.|..U.\f.T|
|00004470| 00 cf 82 55 00 d0 63 88 | d1 cc 21 88 82 36 00 d2 |...U..c.|..!..6..|
|00004480| 20 13 29 0e 13 62 88 d4 | 5c 66 83 70 00 0e 15 82 | .)..b..|\f.p....|
|00004490| 72 00 0e 16 0e 17 d8 23 | 83 90 00 d9 94 d9 95 7b |r......#|.......{|
|000044a0| 0b 98 84 90 00 c2 1e 1a | db 0b d8 89 23 88 29 82 |........|....#.).|
|000044b0| 9b 00 dc c2 77 88 c2 1e | 1a 0b 63 88 29 2b d4 0e |....w...|..c.)+..|
|000044c0| 1d 21 88 d9 94 16 1e d9 | 95 16 17 df 20 87 22 20 |.!......|.... ." |
|000044d0| 5b 70 6f 2d 63 68 65 63 | 6b 2d 6c 6f 63 6b 20 70 |[po-chec|k-lock p|
|000044e0| 6f 2d 6f 62 73 6f 6c 65 | 74 65 2d 66 6c 61 67 20 |o-obsole|te-flag |
|000044f0| 6e 69 6c 20 73 74 72 69 | 6e 67 20 6f 62 73 6f 6c |nil stri|ng obsol|
|00004500| 65 74 65 20 62 75 66 66 | 65 72 20 70 6f 2d 77 6f |ete buff|er po-wo|
|00004510| 72 6b 2d 62 75 66 66 65 | 72 20 65 72 61 73 65 2d |rk-buffe|r erase-|
|00004520| 62 75 66 66 65 72 20 66 | 6f 72 6d 20 70 75 73 68 |buffer f|orm push|
|00004530| 2d 6d 61 72 6b 20 65 76 | 61 6c 20 31 30 20 22 5c |-mark ev|al 10 "\|
|00004540| 6e 22 20 22 23 20 23 22 | 20 22 23 22 20 22 23 20 |n" "# #"| "#" "# |
|00004550| 23 20 22 20 22 23 20 22 | 20 73 65 61 72 63 68 2d |# " "# "| search-|
|00004560| 66 6f 72 77 61 72 64 20 | 62 75 66 66 65 72 2d 73 |forward |buffer-s|
|00004570| 74 72 69 6e 67 20 70 6f | 2d 73 74 61 72 74 2d 6f |tring po|-start-o|
|00004580| 66 2d 65 6e 74 72 79 20 | 72 65 2d 73 65 61 72 63 |f-entry |re-searc|
|00004590| 68 2d 66 6f 72 77 61 72 | 64 20 70 6f 2d 6f 62 73 |h-forwar|d po-obs|
|000045a0| 6f 6c 65 74 65 2d 63 6f | 6d 6d 65 6e 74 2d 72 65 |olete-co|mment-re|
|000045b0| 67 65 78 70 20 70 6f 2d | 61 63 74 69 76 65 2d 63 |gexp po-|active-c|
|000045c0| 6f 6d 6d 65 6e 74 2d 72 | 65 67 65 78 70 20 70 6f |omment-r|egexp po|
|000045d0| 2d 65 6e 64 2d 6f 66 2d | 65 6e 74 72 79 20 74 20 |-end-of-|entry t |
|000045e0| 30 20 62 75 66 66 65 72 | 2d 72 65 61 64 2d 6f 6e |0 buffer|-read-on|
|000045f0| 6c 79 20 72 65 70 6c 61 | 63 65 2d 6d 61 74 63 68 |ly repla|ce-match|
|00004600| 20 22 20 09 5c 6e 22 20 | 70 6f 2d 61 6e 79 2d 6d | " .\n" |po-any-m|
|00004610| 73 67 73 74 72 2d 72 65 | 67 65 78 70 20 70 6f 2d |sgstr-re|gexp po-|
|00004620| 6d 69 64 64 6c 65 2d 6f | 66 2d 65 6e 74 72 79 20 |middle-o|f-entry |
|00004630| 70 6f 2d 72 65 64 69 73 | 70 6c 61 79 5d 20 34 20 |po-redis|play] 4 |
|00004640| 28 23 24 20 2e 20 31 37 | 31 33 31 29 5d 29 0a 23 |(#$ . 17|131)]).#|
|00004650| 40 36 31 20 50 75 73 68 | 20 74 68 65 20 6d 73 67 |@61 Push| the msg|
|00004660| 73 74 72 20 73 74 72 69 | 6e 67 20 66 72 6f 6d 20 |str stri|ng from |
|00004670| 63 75 72 72 65 6e 74 20 | 65 6e 74 72 79 20 6f 6e |current |entry on|
|00004680| 20 74 68 65 20 6b 69 6c | 6c 20 72 69 6e 67 2e 1f | the kil|l ring..|
|00004690| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 70 6f 2d 6b |.(defali|as 'po-k|
|000046a0| 69 6c 6c 2d 72 69 6e 67 | 2d 73 61 76 65 2d 63 6f |ill-ring|-save-co|
|000046b0| 6d 6d 65 6e 74 20 23 5b | 6e 69 6c 20 22 c0 20 88 |mment #[|nil ". .|
|000046c0| c1 c2 21 87 22 20 5b 70 | 6f 2d 66 69 6e 64 2d 73 |..!." [p|o-find-s|
|000046d0| 70 61 6e 2d 6f 66 2d 65 | 6e 74 72 79 20 70 6f 2d |pan-of-e|ntry po-|
|000046e0| 67 65 74 2d 63 6f 6d 6d | 65 6e 74 20 74 5d 20 32 |get-comm|ent t] 2|
|000046f0| 20 28 23 24 20 2e 20 31 | 38 30 30 34 29 20 6e 69 | (#$ . 1|8004) ni|
|00004700| 6c 5d 29 0a 23 40 37 34 | 20 45 6d 70 74 79 20 74 |l]).#@74| Empty t|
|00004710| 68 65 20 6d 73 67 73 74 | 72 20 73 74 72 69 6e 67 |he msgst|r string|
|00004720| 20 66 72 6f 6d 20 63 75 | 72 72 65 6e 74 20 65 6e | from cu|rrent en|
|00004730| 74 72 79 2c 20 70 75 73 | 68 69 6e 67 20 69 74 20 |try, pus|hing it |
|00004740| 6f 6e 20 74 68 65 20 6b | 69 6c 6c 20 72 69 6e 67 |on the k|ill ring|
|00004750| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 70 6f |...(defa|lias 'po|
|00004760| 2d 6b 69 6c 6c 2d 63 6f | 6d 6d 65 6e 74 20 23 5b |-kill-co|mment #[|
|00004770| 6e 69 6c 20 22 c0 20 88 | c1 c2 21 88 c3 20 87 22 |nil ". .|..!.. ."|
|00004780| 20 5b 70 6f 2d 6b 69 6c | 6c 2d 72 69 6e 67 2d 73 | [po-kil|l-ring-s|
|00004790| 61 76 65 2d 63 6f 6d 6d | 65 6e 74 20 70 6f 2d 73 |ave-comm|ent po-s|
|000047a0| 65 74 2d 63 6f 6d 6d 65 | 6e 74 20 22 22 20 70 6f |et-comme|nt "" po|
|000047b0| 2d 72 65 64 69 73 70 6c | 61 79 5d 20 32 20 28 23 |-redispl|ay] 2 (#|
|000047c0| 24 20 2e 20 31 38 31 38 | 35 29 20 6e 69 6c 5d 29 |$ . 1818|5) nil])|
|000047d0| 0a 23 40 36 35 20 52 65 | 70 6c 61 63 65 20 74 68 |.#@65 Re|place th|
|000047e0| 65 20 63 75 72 72 65 6e | 74 20 63 6f 6d 6d 65 6e |e curren|t commen|
|000047f0| 74 20 73 74 72 69 6e 67 | 20 62 79 20 74 68 65 20 |t string| by the |
|00004800| 74 6f 70 20 6f 66 20 74 | 68 65 20 6b 69 6c 6c 20 |top of t|he kill |
|00004810| 72 69 6e 67 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |ring...(|defalias|
|00004820| 20 27 70 6f 2d 79 61 6e | 6b 2d 63 6f 6d 6d 65 6e | 'po-yan|k-commen|
|00004830| 74 20 23 5b 6e 69 6c 20 | 22 c0 20 88 c1 5c 6e c3 |t #[nil |". ..\n.|
|00004840| 3d 83 0e 00 c4 82 0f 00 | c5 21 88 c3 16 06 c7 20 |=.......|.!..... |
|00004850| 87 22 20 5b 70 6f 2d 66 | 69 6e 64 2d 73 70 61 6e |." [po-f|ind-span|
|00004860| 2d 6f 66 2d 65 6e 74 72 | 79 20 70 6f 2d 73 65 74 |-of-entr|y po-set|
|00004870| 2d 63 6f 6d 6d 65 6e 74 | 20 6c 61 73 74 2d 63 6f |-comment| last-co|
|00004880| 6d 6d 61 6e 64 20 79 61 | 6e 6b 20 28 79 61 6e 6b |mmand ya|nk (yank|
|00004890| 2d 70 6f 70 20 31 29 20 | 28 79 61 6e 6b 29 20 74 |-pop 1) |(yank) t|
|000048a0| 68 69 73 2d 63 6f 6d 6d | 61 6e 64 20 70 6f 2d 72 |his-comm|and po-r|
|000048b0| 65 64 69 73 70 6c 61 79 | 5d 20 33 20 28 23 24 20 |edisplay|] 3 (#$ |
|000048c0| 2e 20 31 38 33 39 30 29 | 20 6e 69 6c 5d 29 0a 23 |. 18390)| nil]).#|
|000048d0| 40 31 32 31 20 45 64 69 | 74 20 53 54 52 49 4e 47 |@121 Edi|t STRING|
|000048e0| 20 72 65 63 75 72 73 69 | 76 65 6c 79 20 69 6e 20 | recursi|vely in |
|000048f0| 61 20 70 6f 70 2d 75 70 | 20 62 75 66 66 65 72 2c |a pop-up| buffer,|
|00004900| 20 72 65 74 75 72 6e 20 | 74 68 65 20 65 64 69 74 | return |the edit|
|00004910| 65 64 20 73 74 72 69 6e | 67 2e 0a 49 66 20 72 65 |ed strin|g..If re|
|00004920| 63 75 72 73 69 76 65 20 | 65 64 69 74 20 69 73 20 |cursive |edit is |
|00004930| 61 62 6f 72 74 65 64 2c | 20 72 65 74 75 72 6e 20 |aborted,| return |
|00004940| 6e 69 6c 20 69 6e 73 74 | 65 61 64 2e 1f 0a 28 64 |nil inst|ead...(d|
|00004950| 65 66 61 6c 69 61 73 20 | 27 70 6f 2d 65 64 69 74 |efalias |'po-edit|
|00004960| 2d 73 74 72 69 6e 67 20 | 23 5b 28 73 74 72 69 6e |-string |#[(strin|
|00004970| 67 29 20 22 c0 20 88 c1 | 5c 6e 0b 5c 66 0d 1e 06 |g) ". ..|\n.\f...|
|00004980| 1e 07 1e 08 1e 09 1e 5c | 6e cb 8b cc 0e 0d 21 88 |.......\|n.....!.|
|00004990| 0e 09 12 0e 08 13 0e 07 | 14 0e 06 15 2d 87 22 20 |........|....-." |
|000049a0| 5b 70 6f 2d 63 68 65 63 | 6b 2d 6c 6f 63 6b 20 74 |[po-chec|k-lock t|
|000049b0| 20 70 6f 2d 73 74 61 72 | 74 2d 6f 66 2d 65 6e 74 | po-star|t-of-ent|
|000049c0| 72 79 20 70 6f 2d 6d 69 | 64 64 6c 65 2d 6f 66 2d |ry po-mi|ddle-of-|
|000049d0| 65 6e 74 72 79 20 70 6f | 2d 65 6e 64 2d 6f 66 2d |entry po|-end-of-|
|000049e0| 65 6e 74 72 79 20 70 6f | 2d 6f 62 73 6f 6c 65 74 |entry po|-obsolet|
|000049f0| 65 2d 66 6c 61 67 20 6f | 62 73 6f 6c 65 74 65 20 |e-flag o|bsolete |
|00004a00| 65 6e 64 20 6d 69 64 64 | 6c 65 20 73 74 61 72 74 |end midd|le start|
|00004a10| 20 70 6f 2d 77 6f 72 6b | 2d 62 75 66 66 65 72 2d | po-work|-buffer-|
|00004a20| 6c 6f 63 6b 20 28 28 62 | 79 74 65 2d 63 6f 64 65 |lock ((b|yte-code|
|00004a30| 20 22 c0 09 21 88 c2 20 | 88 0b c4 b1 02 88 65 62 | "..!.. |......eb|
|00004a40| 88 c5 c6 c7 8f 87 22 20 | 5b 70 6f 70 2d 74 6f 2d |......" |[pop-to-|
|00004a50| 62 75 66 66 65 72 20 70 | 6f 2d 77 6f 72 6b 2d 62 |buffer p|o-work-b|
|00004a60| 75 66 66 65 72 20 65 72 | 61 73 65 2d 62 75 66 66 |uffer er|ase-buff|
|00004a70| 65 72 20 73 74 72 69 6e | 67 20 22 3c 22 20 6e 69 |er strin|g "<" ni|
|00004a80| 6c 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 09 |l (byte-|code "..|
|00004a90| 21 88 c2 c3 21 88 c4 20 | 88 64 62 88 c5 c6 78 88 |!...!.. |.db...x.|
|00004aa0| 68 c7 3d 83 1d 00 60 53 | 64 7c 88 c8 20 87 22 20 |h.=...`S|d|.. ." |
|00004ab0| 5b 75 73 65 2d 6c 6f 63 | 61 6c 2d 6d 61 70 20 70 |[use-loc|al-map p|
|00004ac0| 6f 2d 65 64 69 74 2d 6d | 6f 64 65 2d 6d 61 70 20 |o-edit-m|ode-map |
|00004ad0| 6d 65 73 73 61 67 65 20 | 22 54 79 70 65 20 60 43 |message |"Type `C|
|00004ae0| 2d 63 20 43 2d 63 27 20 | 6f 6e 63 65 20 64 6f 6e |-c C-c' |once don|
|00004af0| 65 22 20 72 65 63 75 72 | 73 69 76 65 2d 65 64 69 |e" recur|sive-edi|
|00004b00| 74 20 22 20 09 5c 6e 22 | 20 6e 69 6c 20 36 30 20 |t " .\n"| nil 60 |
|00004b10| 62 75 66 66 65 72 2d 73 | 74 72 69 6e 67 5d 20 32 |buffer-s|tring] 2|
|00004b20| 29 20 28 28 71 75 69 74 | 29 29 5d 20 33 29 29 20 |) ((quit|))] 3)) |
|00004b30| 62 75 72 79 2d 62 75 66 | 66 65 72 20 70 6f 2d 77 |bury-buf|fer po-w|
|00004b40| 6f 72 6b 2d 62 75 66 66 | 65 72 5d 20 35 20 28 23 |ork-buff|er] 5 (#|
|00004b50| 24 20 2e 20 31 38 36 34 | 35 29 5d 29 0a 23 40 34 |$ . 1864|5)]).#@4|
|00004b60| 38 20 55 73 65 20 61 6e | 6f 74 68 65 72 20 77 69 |8 Use an|other wi|
|00004b70| 6e 64 6f 77 20 74 6f 20 | 65 64 69 74 20 74 68 65 |ndow to |edit the|
|00004b80| 20 63 75 72 72 65 6e 74 | 20 6d 73 67 73 74 72 2e | current| msgstr.|
|00004b90| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 70 6f 2d |..(defal|ias 'po-|
|00004ba0| 65 64 69 74 2d 63 6f 6d | 6d 65 6e 74 20 23 5b 6e |edit-com|ment #[n|
|00004bb0| 69 6c 20 22 c0 20 88 c1 | c2 c3 21 21 89 1c 83 11 |il ". ..|..!!....|
|00004bc0| 00 c5 5c 66 21 88 c6 20 | 29 87 22 20 5b 70 6f 2d |..\f!.. |)." [po-|
|00004bd0| 66 69 6e 64 2d 73 70 61 | 6e 2d 6f 66 2d 65 6e 74 |find-spa|n-of-ent|
|00004be0| 72 79 20 70 6f 2d 65 64 | 69 74 2d 73 74 72 69 6e |ry po-ed|it-strin|
|00004bf0| 67 20 70 6f 2d 67 65 74 | 2d 63 6f 6d 6d 65 6e 74 |g po-get|-comment|
|00004c00| 20 6e 69 6c 20 73 74 72 | 69 6e 67 20 70 6f 2d 73 | nil str|ing po-s|
|00004c10| 65 74 2d 63 6f 6d 6d 65 | 6e 74 20 70 6f 2d 72 65 |et-comme|nt po-re|
|00004c20| 64 69 73 70 6c 61 79 5d | 20 34 20 28 23 24 20 2e |display]| 4 (#$ .|
|00004c30| 20 31 39 32 39 38 29 20 | 6e 69 6c 5d 29 0a 23 40 | 19298) |nil]).#@|
|00004c40| 34 38 20 55 73 65 20 61 | 6e 6f 74 68 65 72 20 77 |48 Use a|nother w|
|00004c50| 69 6e 64 6f 77 20 74 6f | 20 65 64 69 74 20 74 68 |indow to| edit th|
|00004c60| 65 20 63 75 72 72 65 6e | 74 20 6d 73 67 73 74 72 |e curren|t msgstr|
|00004c70| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 70 6f |...(defa|lias 'po|
|00004c80| 2d 65 64 69 74 2d 6d 73 | 67 73 74 72 20 23 5b 6e |-edit-ms|gstr #[n|
|00004c90| 69 6c 20 22 c0 20 88 c1 | c2 c3 89 5c 22 21 89 1c |il ". ..|...\"!..|
|00004ca0| 83 13 00 c5 c3 5c 66 5c | 22 88 c6 20 29 87 22 20 |.....\f\|".. )." |
|00004cb0| 5b 70 6f 2d 66 69 6e 64 | 2d 73 70 61 6e 2d 6f 66 |[po-find|-span-of|
|00004cc0| 2d 65 6e 74 72 79 20 70 | 6f 2d 65 64 69 74 2d 73 |-entry p|o-edit-s|
|00004cd0| 74 72 69 6e 67 20 70 6f | 2d 67 65 74 2d 66 69 65 |tring po|-get-fie|
|00004ce0| 6c 64 20 6e 69 6c 20 73 | 74 72 69 6e 67 20 70 6f |ld nil s|tring po|
|00004cf0| 2d 73 65 74 2d 66 69 65 | 6c 64 20 70 6f 2d 72 65 |-set-fie|ld po-re|
|00004d00| 64 69 73 70 6c 61 79 5d | 20 35 20 28 23 24 20 2e |display]| 5 (#$ .|
|00004d10| 20 31 39 35 32 33 29 20 | 6e 69 6c 5d 29 0a 23 40 | 19523) |nil]).#@|
|00004d20| 37 33 20 4e 6f 72 6d 61 | 6c 69 7a 65 20 6f 6c 64 |73 Norma|lize old|
|00004d30| 20 67 65 74 74 65 78 74 | 20 73 74 79 6c 65 20 66 | gettext| style f|
|00004d40| 69 65 6c 64 73 20 75 73 | 69 6e 67 20 4b 26 52 20 |ields us|ing K&R |
|00004d50| 43 20 6d 75 6c 74 69 6c | 69 6e 65 20 73 74 72 69 |C multil|ine stri|
|00004d60| 6e 67 20 73 79 6e 74 61 | 78 2e 1f 0a 28 64 65 66 |ng synta|x...(def|
|00004d70| 61 6c 69 61 73 20 27 70 | 6f 2d 6e 6f 72 6d 61 6c |alias 'p|o-normal|
|00004d80| 69 7a 65 2d 6f 6c 64 2d | 73 74 79 6c 65 20 23 5b |ize-old-|style #[|
|00004d90| 28 65 78 70 6c 61 69 6e | 29 20 22 c0 20 c1 c2 1b |(explain|) ". ...|
|00004da0| 1c 1d 65 62 88 c6 c7 5c | 66 0e 08 23 88 c9 ca c2 |..eb...\|f..#....|
|00004db0| cb 23 83 34 00 5c 66 cc | a6 c1 55 83 28 00 c6 c7 |.#.4.\f.|..U.(...|
|00004dc0| 5c 66 0e 08 23 88 cd ce | cb c2 23 88 5c 66 54 14 |\f..#...|..#.\fT.|
|00004dd0| 82 11 00 0d 62 88 c6 cf | 5c 66 5c 22 2b 87 22 20 |....b...|\f\"+." |
|00004de0| 5b 70 6f 69 6e 74 2d 6d | 61 72 6b 65 72 20 30 20 |[point-m|arker 0 |
|00004df0| 6e 69 6c 20 62 75 66 66 | 65 72 2d 72 65 61 64 2d |nil buff|er-read-|
|00004e00| 6f 6e 6c 79 20 63 6f 75 | 6e 74 65 72 20 68 65 72 |only cou|nter her|
|00004e10| 65 20 6d 65 73 73 61 67 | 65 20 22 4e 6f 72 6d 61 |e messag|e "Norma|
|00004e20| 6c 69 7a 69 6e 67 20 25 | 64 2c 20 25 73 22 20 65 |lizing %|d, %s" e|
|00004e30| 78 70 6c 61 69 6e 20 72 | 65 2d 73 65 61 72 63 68 |xplain r|e-search|
|00004e40| 2d 66 6f 72 77 61 72 64 | 20 22 5c 5c 28 5e 23 3f |-forward| "\\(^#?|
|00004e50| 5b 20 09 5d 2a 6d 73 67 | 5c 5c 28 69 64 5c 5c 7c |[ .]*msg|\\(id\\||
|00004e60| 73 74 72 5c 5c 29 5b 20 | 09 5d 2a 5c 22 5c 5c 7c |str\\)[ |.]*\"\\||
|00004e70| 5b 5e 5c 22 20 09 5d 5b | 20 09 5d 2a 5c 5c 29 5c |[^\" .][| .]*\\)\|
|00004e80| 5c 5c 5c 5c 6e 22 20 74 | 20 31 30 20 72 65 70 6c |\\\\n" t| 10 repl|
|00004e90| 61 63 65 2d 6d 61 74 63 | 68 20 22 5c 5c 31 5c 22 |ace-matc|h "\\1\"|
|00004ea0| 5c 6e 5c 22 22 20 22 4e | 6f 72 6d 61 6c 69 7a 69 |\n\"" "N|ormalizi|
|00004eb0| 6e 67 20 25 64 2e 2e 2e | 64 6f 6e 65 22 5d 20 34 |ng %d...|done"] 4|
|00004ec0| 20 28 23 24 20 2e 20 31 | 39 37 34 37 29 5d 29 0a | (#$ . 1|9747)]).|
|00004ed0| 23 40 34 36 20 4e 6f 72 | 6d 61 6c 69 7a 65 20 61 |#@46 Nor|malize a|
|00004ee0| 6c 6c 20 6d 73 67 73 74 | 72 27 73 2c 20 6f 72 20 |ll msgst|r's, or |
|00004ef0| 6d 73 67 69 64 27 73 20 | 69 66 20 4d 53 47 49 44 |msgid's |if MSGID|
|00004f00| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 70 6f |...(defa|lias 'po|
|00004f10| 2d 6e 6f 72 6d 61 6c 69 | 7a 65 2d 66 69 65 6c 64 |-normali|ze-field|
|00004f20| 20 23 5b 28 6d 73 67 69 | 64 20 65 78 70 6c 61 69 | #[(msgi|d explai|
|00004f30| 6e 29 20 22 c0 20 c1 1a | 1b 65 62 88 c4 0d c6 c7 |n) ". ..|.eb.....|
|00004f40| 23 83 3a 00 5c 6e c8 a6 | c1 55 83 1f 00 c9 ca 5c |#.:.\n..|.U.....\|
|00004f50| 6e 0e 0b 23 88 c1 94 62 | 88 cc 20 88 cd 0e 0e cf |n..#...b|.. .....|
|00004f60| 0e 0e c6 5c 22 5c 22 88 | 0e 10 62 88 5c 6e 54 12 |...\"\".|..b.\nT.|
|00004f70| 82 08 00 0b 62 88 c9 d1 | 5c 6e 5c 22 2a 87 22 20 |....b...|\n\"*." |
|00004f80| 5b 70 6f 69 6e 74 2d 6d | 61 72 6b 65 72 20 30 20 |[point-m|arker 0 |
|00004f90| 63 6f 75 6e 74 65 72 20 | 68 65 72 65 20 72 65 2d |counter |here re-|
|00004fa0| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 70 |search-f|orward p|
|00004fb0| 6f 2d 61 6e 79 2d 6d 73 | 67 73 74 72 2d 72 65 67 |o-any-ms|gstr-reg|
|00004fc0| 65 78 70 20 6e 69 6c 20 | 74 20 31 30 20 6d 65 73 |exp nil |t 10 mes|
|00004fd0| 73 61 67 65 20 22 4e 6f | 72 6d 61 6c 69 7a 69 6e |sage "No|rmalizin|
|00004fe0| 67 20 25 64 2c 20 25 73 | 22 20 65 78 70 6c 61 69 |g %d, %s|" explai|
|00004ff0| 6e 20 70 6f 2d 66 69 6e | 64 2d 73 70 61 6e 2d 6f |n po-fin|d-span-o|
|00005000| 66 2d 65 6e 74 72 79 20 | 70 6f 2d 73 65 74 2d 66 |f-entry |po-set-f|
|00005010| 69 65 6c 64 20 6d 73 67 | 69 64 20 70 6f 2d 67 65 |ield msg|id po-ge|
|00005020| 74 2d 66 69 65 6c 64 20 | 70 6f 2d 65 6e 64 2d 6f |t-field |po-end-o|
|00005030| 66 2d 65 6e 74 72 79 20 | 22 4e 6f 72 6d 61 6c 69 |f-entry |"Normali|
|00005040| 7a 69 6e 67 20 25 64 2e | 2e 2e 64 6f 6e 65 22 5d |zing %d.|..done"]|
|00005050| 20 35 20 28 23 24 20 2e | 20 32 30 31 38 31 29 5d | 5 (#$ .| 20181)]|
|00005060| 29 0a 23 40 33 39 20 4e | 6f 72 6d 61 6c 69 7a 65 |).#@39 N|ormalize|
|00005070| 20 61 6c 6c 20 65 6e 74 | 72 69 65 73 20 69 6e 20 | all ent|ries in |
|00005080| 74 68 65 20 50 4f 20 66 | 69 6c 65 2e 1f 0a 28 64 |the PO f|ile...(d|
|00005090| 65 66 61 6c 69 61 73 20 | 27 70 6f 2d 6e 6f 72 6d |efalias |'po-norm|
|000050a0| 61 6c 69 7a 65 20 23 5b | 6e 69 6c 20 22 c0 c1 21 |alize #[|nil "..!|
|000050b0| 88 c2 c3 c4 5c 22 88 c2 | c5 c6 5c 22 88 0e 07 64 |....\"..|..\"...d|
|000050c0| 55 3f 85 1f 00 c5 1e 08 | c9 0e 07 64 5c 22 29 87 |U?......|...d\").|
|000050d0| 22 20 5b 70 6f 2d 6e 6f | 72 6d 61 6c 69 7a 65 2d |" [po-no|rmalize-|
|000050e0| 6f 6c 64 2d 73 74 79 6c | 65 20 22 70 61 73 73 20 |old-styl|e "pass |
|000050f0| 31 2f 33 22 20 70 6f 2d | 6e 6f 72 6d 61 6c 69 7a |1/3" po-|normaliz|
|00005100| 65 2d 66 69 65 6c 64 20 | 74 20 22 70 61 73 73 20 |e-field |t "pass |
|00005110| 32 2f 33 22 20 6e 69 6c | 20 22 70 61 73 73 20 33 |2/3" nil| "pass 3|
|00005120| 2f 33 22 20 70 6f 2d 65 | 6e 64 2d 6f 66 2d 65 6e |/3" po-e|nd-of-en|
|00005130| 74 72 79 20 62 75 66 66 | 65 72 2d 72 65 61 64 2d |try buff|er-read-|
|00005140| 6f 6e 6c 79 20 6b 69 6c | 6c 2d 72 65 67 69 6f 6e |only kil|l-region|
|00005150| 5d 20 33 20 28 23 24 20 | 2e 20 32 30 35 38 33 29 |] 3 (#$ |. 20583)|
|00005160| 20 6e 69 6c 5d 29 0a 23 | 40 35 38 20 45 63 68 6f | nil]).#|@58 Echo|
|00005170| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 73 6f 75 | the cur|rent sou|
|00005180| 72 63 65 20 73 65 61 72 | 63 68 20 70 61 74 68 20 |rce sear|ch path |
|00005190| 69 6e 20 74 68 65 20 6d | 65 73 73 61 67 65 20 61 |in the m|essage a|
|000051a0| 72 65 61 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |rea...(d|efalias |
|000051b0| 27 70 6f 2d 73 68 6f 77 | 2d 70 61 74 68 20 23 5b |'po-show|-path #[|
|000051c0| 6e 69 6c 20 22 08 c1 1a | 89 1b 83 16 00 5c 6e c4 |nil "...|.....\n.|
|000051d0| 0b 40 40 51 12 0b 41 89 | 13 84 08 00 c5 5c 6e 21 |.@@Q..A.|.....\n!|
|000051e0| 2a 87 22 20 5b 70 6f 2d | 73 65 61 72 63 68 2d 70 |*." [po-|search-p|
|000051f0| 61 74 68 20 22 50 61 74 | 68 20 69 73 3a 22 20 73 |ath "Pat|h is:" s|
|00005200| 74 72 69 6e 67 20 70 61 | 74 68 20 22 20 22 20 6d |tring pa|th " " m|
|00005210| 65 73 73 61 67 65 5d 20 | 34 20 28 23 24 20 2e 20 |essage] |4 (#$ . |
|00005220| 32 30 38 34 34 29 5d 29 | 0a 23 40 37 36 20 41 64 |20844)])|.#@76 Ad|
|00005230| 64 20 61 20 67 69 76 65 | 6e 20 44 49 52 45 43 54 |d a give|n DIRECT|
|00005240| 4f 52 59 2c 20 72 65 71 | 75 65 73 74 65 64 20 69 |ORY, req|uested i|
|00005250| 6e 74 65 72 61 63 74 69 | 76 65 6c 79 2c 20 74 6f |nteracti|vely, to|
|00005260| 20 74 68 65 20 73 6f 75 | 72 63 65 20 73 65 61 72 | the sou|rce sear|
|00005270| 63 68 20 70 61 74 68 2e | 1f 0a 28 64 65 66 61 6c |ch path.|..(defal|
|00005280| 69 61 73 20 27 70 6f 2d | 61 64 64 2d 70 61 74 68 |ias 'po-|add-path|
|00005290| 20 23 5b 28 64 69 72 65 | 63 74 6f 72 79 29 20 22 | #[(dire|ctory) "|
|000052a0| 08 43 09 42 11 c2 13 c4 | 20 87 22 20 5b 64 69 72 |.C.B....| ." [dir|
|000052b0| 65 63 74 6f 72 79 20 70 | 6f 2d 73 65 61 72 63 68 |ectory p|o-search|
|000052c0| 2d 70 61 74 68 20 30 20 | 70 6f 2d 72 65 66 65 72 |-path 0 |po-refer|
|000052d0| 65 6e 63 65 2d 63 68 65 | 63 6b 20 70 6f 2d 73 68 |ence-che|ck po-sh|
|000052e0| 6f 77 2d 70 61 74 68 5d | 20 32 20 28 23 24 20 2e |ow-path]| 2 (#$ .|
|000052f0| 20 32 31 30 33 38 29 20 | 22 44 44 69 72 65 63 74 | 21038) |"DDirect|
|00005300| 6f 72 79 20 66 6f 72 20 | 73 65 61 72 63 68 20 70 |ory for |search p|
|00005310| 61 74 68 3a 20 22 5d 29 | 0a 23 40 37 36 20 44 65 |ath: "])|.#@76 De|
|00005320| 6c 65 74 65 20 61 20 64 | 69 72 65 63 74 6f 72 79 |lete a d|irectory|
|00005330| 2c 20 73 65 6c 65 63 74 | 65 64 20 77 69 74 68 20 |, select|ed with |
|00005340| 63 6f 6d 70 6c 65 74 69 | 6f 6e 2c 20 66 72 6f 6d |completi|on, from|
|00005350| 20 74 68 65 20 73 6f 75 | 72 63 65 20 73 65 61 72 | the sou|rce sear|
|00005360| 63 68 20 70 61 74 68 2e | 1f 0a 28 64 65 66 61 6c |ch path.|..(defal|
|00005370| 69 61 73 20 27 70 6f 2d | 64 65 6c 65 74 65 2d 70 |ias 'po-|delete-p|
|00005380| 61 74 68 20 23 5b 6e 69 | 6c 20 22 c0 c1 c2 0b c4 |ath #[ni|l ".....|
|00005390| c5 24 43 0b 5c 22 13 c6 | 16 07 c8 20 87 22 20 5b |.$C.\"..|... ." [|
|000053a0| 64 65 6c 65 74 65 20 63 | 6f 6d 70 6c 65 74 69 6e |delete c|ompletin|
|000053b0| 67 2d 72 65 61 64 20 22 | 44 69 72 65 63 74 6f 72 |g-read "|Director|
|000053c0| 79 20 74 6f 20 72 65 6d | 6f 76 65 3f 20 22 20 70 |y to rem|ove? " p|
|000053d0| 6f 2d 73 65 61 72 63 68 | 2d 70 61 74 68 20 6e 69 |o-search|-path ni|
|000053e0| 6c 20 74 20 30 20 70 6f | 2d 72 65 66 65 72 65 6e |l t 0 po|-referen|
|000053f0| 63 65 2d 63 68 65 63 6b | 20 70 6f 2d 73 68 6f 77 |ce-check| po-show|
|00005400| 2d 70 61 74 68 5d 20 36 | 20 28 23 24 20 2e 20 32 |-path] 6| (#$ . 2|
|00005410| 31 32 37 38 29 20 6e 69 | 6c 5d 29 0a 23 40 37 32 |1278) ni|l]).#@72|
|00005420| 20 45 78 74 72 61 63 74 | 20 61 6c 6c 20 72 65 66 | Extract| all ref|
|00005430| 65 72 65 6e 63 65 73 20 | 69 6e 74 6f 20 61 20 6c |erences |into a l|
|00005440| 69 73 74 2c 20 77 69 74 | 68 20 70 61 74 68 73 20 |ist, wit|h paths |
|00005450| 72 65 73 6f 6c 76 65 64 | 2c 20 69 66 20 6e 65 63 |resolved|, if nec|
|00005460| 65 73 73 61 72 79 2e 1f | 0a 28 64 65 66 61 6c 69 |essary..|.(defali|
|00005470| 61 73 20 27 70 6f 2d 65 | 6e 73 75 72 65 2d 72 65 |as 'po-e|nsure-re|
|00005480| 66 65 72 65 6e 63 65 73 | 20 23 5b 6e 69 6c 20 22 |ferences| #[nil "|
|00005490| c0 20 88 09 5c 6e 55 3f | 85 79 00 c3 14 8a 09 62 |. ..\nU?|.y.....b|
|000054a0| 88 c5 c6 0e 07 c8 23 83 | 6f 00 c9 ca 21 83 6f 00 |......#.|o...!.o.|
|000054b0| cb 95 62 88 cc 94 cc 95 | 7b 1e 0d ce 94 ce 95 7b |..b.....|{......{|
|000054c0| 1e 0f 0e 10 1e 11 c3 1e | 12 0e 11 40 40 0e 0d 50 |........|...@@..P|
|000054d0| 16 12 d3 0e 12 21 84 56 | 00 0e 11 83 56 00 0e 11 |.....!.V|....V...|
|000054e0| 41 89 16 11 82 3a 00 0e | 11 83 6b 00 0e 12 d4 0e |A....:..|..k.....|
|000054f0| 0f 51 0e 12 d5 0e 0f 21 | 45 5c 66 42 14 2c 82 19 |.Q.....!|E\fB.,..|
|00005500| 00 29 5c 66 9f 89 14 16 | 16 09 89 12 87 22 20 5b |.)\f....|....." [|
|00005510| 70 6f 2d 66 69 6e 64 2d | 73 70 61 6e 2d 6f 66 2d |po-find-|span-of-|
|00005520| 65 6e 74 72 79 20 70 6f | 2d 73 74 61 72 74 2d 6f |entry po|-start-o|
|00005530| 66 2d 65 6e 74 72 79 20 | 70 6f 2d 72 65 66 65 72 |f-entry |po-refer|
|00005540| 65 6e 63 65 2d 63 68 65 | 63 6b 20 6e 69 6c 20 70 |ence-che|ck nil p|
|00005550| 6f 2d 72 65 66 65 72 65 | 6e 63 65 2d 61 6c 69 73 |o-refere|nce-alis|
|00005560| 74 20 72 65 2d 73 65 61 | 72 63 68 2d 66 6f 72 77 |t re-sea|rch-forw|
|00005570| 61 72 64 20 22 5e 23 3a | 22 20 70 6f 2d 65 6e 64 |ard "^#:|" po-end|
|00005580| 2d 6f 66 2d 65 6e 74 72 | 79 20 74 20 6c 6f 6f 6b |-of-entr|y t look|
|00005590| 69 6e 67 2d 61 74 20 22 | 5c 5c 28 5c 6e 23 3a 5c |ing-at "|\\(\n#:\|
|000055a0| 5c 29 3f 20 2a 5c 5c 28 | 5b 5e 3a 20 5d 2b 5c 5c |\)? *\\(|[^: ]+\\|
|000055b0| 29 3a 5c 5c 28 5b 30 2d | 39 5d 2b 5c 5c 29 22 20 |):\\([0-|9]+\\)" |
|000055c0| 30 20 32 20 6e 61 6d 65 | 20 33 20 6c 69 6e 65 20 |0 2 name| 3 line |
|000055d0| 70 6f 2d 73 65 61 72 63 | 68 2d 70 61 74 68 20 70 |po-searc|h-path p|
|000055e0| 61 74 68 20 66 69 6c 65 | 20 66 69 6c 65 2d 65 78 |ath file| file-ex|
|000055f0| 69 73 74 73 2d 70 20 22 | 3a 22 20 73 74 72 69 6e |ists-p "|:" strin|
|00005600| 67 2d 74 6f 2d 69 6e 74 | 20 70 6f 2d 72 65 66 65 |g-to-int| po-refe|
|00005610| 72 65 6e 63 65 2d 63 75 | 72 73 6f 72 5d 20 35 20 |rence-cu|rsor] 5 |
|00005620| 28 23 24 20 2e 20 32 31 | 35 33 37 29 5d 29 0a 23 |(#$ . 21|537)]).#|
|00005630| 40 37 30 20 53 68 6f 77 | 20 74 68 65 20 73 6f 75 |@70 Show| the sou|
|00005640| 72 63 65 20 63 6f 6e 74 | 65 78 74 20 67 69 76 65 |rce cont|ext give|
|00005650| 6e 20 61 20 54 52 49 50 | 4c 45 54 20 77 68 69 63 |n a TRIP|LET whic|
|00005660| 68 20 69 73 20 28 50 52 | 4f 4d 50 54 20 46 49 4c |h is (PR|OMPT FIL|
|00005670| 45 20 4c 49 4e 45 29 2e | 1f 0a 28 64 65 66 61 6c |E LINE).|..(defal|
|00005680| 69 61 73 20 27 70 6f 2d | 73 68 6f 77 2d 73 6f 75 |ias 'po-|show-sou|
|00005690| 72 63 65 2d 63 6f 6e 74 | 65 78 74 20 23 5b 28 74 |rce-cont|ext #[(t|
|000056a0| 72 69 70 6c 65 74 29 20 | 22 c0 09 41 40 21 88 c2 |riplet) |"..A@!..|
|000056b0| 09 41 41 40 21 88 c3 c4 | 21 88 c5 c6 09 40 5c 22 |.AA@!...|!....@\"|
|000056c0| 87 22 20 5b 66 69 6e 64 | 2d 66 69 6c 65 2d 6f 74 |." [find|-file-ot|
|000056d0| 68 65 72 2d 77 69 6e 64 | 6f 77 20 74 72 69 70 6c |her-wind|ow tripl|
|000056e0| 65 74 20 67 6f 74 6f 2d | 6c 69 6e 65 20 6f 74 68 |et goto-|line oth|
|000056f0| 65 72 2d 77 69 6e 64 6f | 77 20 31 20 6d 65 73 73 |er-windo|w 1 mess|
|00005700| 61 67 65 20 22 44 69 73 | 70 6c 61 79 69 6e 67 20 |age "Dis|playing |
|00005710| 25 73 22 5d 20 33 20 28 | 23 24 20 2e 20 32 32 30 |%s"] 3 (|#$ . 220|
|00005720| 36 38 29 5d 29 0a 23 40 | 31 32 34 20 44 69 73 70 |68)]).#@|124 Disp|
|00005730| 6c 61 79 20 73 6f 6d 65 | 20 73 6f 75 72 63 65 20 |lay some| source |
|00005740| 63 6f 6e 74 65 78 74 20 | 66 6f 72 20 74 68 65 20 |context |for the |
|00005750| 63 75 72 72 65 6e 74 20 | 65 6e 74 72 79 2e 0a 49 |current |entry..I|
|00005760| 66 20 74 68 65 20 63 6f | 6d 6d 61 6e 64 20 69 73 |f the co|mmand is|
|00005770| 20 72 65 70 65 61 74 65 | 64 20 6d 61 6e 79 20 74 | repeate|d many t|
|00005780| 69 6d 65 73 20 69 6e 20 | 61 20 72 6f 77 2c 20 63 |imes in |a row, c|
|00005790| 79 63 6c 65 20 74 68 72 | 6f 75 67 68 20 63 6f 6e |ycle thr|ough con|
|000057a0| 74 65 78 74 73 2e 1f 0a | 28 64 65 66 61 6c 69 61 |texts...|(defalia|
|000057b0| 73 20 27 70 6f 2d 63 79 | 63 6c 65 2d 72 65 66 65 |s 'po-cy|cle-refe|
|000057c0| 72 65 6e 63 65 20 23 5b | 6e 69 6c 20 22 c0 20 88 |rence #[|nil ". .|
|000057d0| 09 83 1b 00 5c 6e c3 3d | 83 16 00 09 41 89 11 84 |....\n.=|....A...|
|000057e0| 16 00 5c 66 11 c5 09 40 | 21 87 c6 c7 21 87 22 20 |..\f...@|!...!." |
|000057f0| 5b 70 6f 2d 65 6e 73 75 | 72 65 2d 72 65 66 65 72 |[po-ensu|re-refer|
|00005800| 65 6e 63 65 73 20 70 6f | 2d 72 65 66 65 72 65 6e |ences po|-referen|
|00005810| 63 65 2d 63 75 72 73 6f | 72 20 6c 61 73 74 2d 63 |ce-curso|r last-c|
|00005820| 6f 6d 6d 61 6e 64 20 70 | 6f 2d 63 79 63 6c 65 2d |ommand p|o-cycle-|
|00005830| 72 65 66 65 72 65 6e 63 | 65 20 70 6f 2d 72 65 66 |referenc|e po-ref|
|00005840| 65 72 65 6e 63 65 2d 61 | 6c 69 73 74 20 70 6f 2d |erence-a|list po-|
|00005850| 73 68 6f 77 2d 73 6f 75 | 72 63 65 2d 63 6f 6e 74 |show-sou|rce-cont|
|00005860| 65 78 74 20 65 72 72 6f | 72 20 22 4e 6f 20 72 65 |ext erro|r "No re|
|00005870| 73 6f 6c 76 65 64 20 73 | 6f 75 72 63 65 20 72 65 |solved s|ource re|
|00005880| 66 65 72 65 6e 63 65 73 | 22 5d 20 33 20 28 23 24 |ferences|"] 3 (#$|
|00005890| 20 2e 20 32 32 33 31 36 | 29 20 6e 69 6c 5d 29 0a | . 22316|) nil]).|
|000058a0| 23 40 36 38 20 53 65 6c | 65 63 74 20 6f 6e 65 20 |#@68 Sel|ect one |
|000058b0| 6f 66 20 74 68 65 20 61 | 76 61 69 6c 61 62 6c 65 |of the a|vailable|
|000058c0| 20 73 6f 75 72 63 65 20 | 63 6f 6e 74 65 78 74 73 | source |contexts|
|000058d0| 20 66 6f 72 20 74 68 65 | 20 63 75 72 72 65 6e 74 | for the| current|
|000058e0| 20 65 6e 74 72 79 2e 1f | 0a 28 64 65 66 61 6c 69 | entry..|.(defali|
|000058f0| 61 73 20 27 70 6f 2d 73 | 65 6c 65 63 74 2d 72 65 |as 'po-s|elect-re|
|00005900| 66 65 72 65 6e 63 65 20 | 23 5b 6e 69 6c 20 22 c0 |ference |#[nil ".|
|00005910| 20 88 09 83 13 00 c2 c3 | c4 c5 09 c6 c7 24 09 5c | .......|.....$.\|
|00005920| 22 21 87 c8 c9 21 87 22 | 20 5b 70 6f 2d 65 6e 73 |"!...!."| [po-ens|
|00005930| 75 72 65 2d 72 65 66 65 | 72 65 6e 63 65 73 20 70 |ure-refe|rences p|
|00005940| 6f 2d 72 65 66 65 72 65 | 6e 63 65 2d 61 6c 69 73 |o-refere|nce-alis|
|00005950| 74 20 70 6f 2d 73 68 6f | 77 2d 73 6f 75 72 63 65 |t po-sho|w-source|
|00005960| 2d 63 6f 6e 74 65 78 74 | 20 61 73 73 6f 63 20 63 |-context| assoc c|
|00005970| 6f 6d 70 6c 65 74 69 6e | 67 2d 72 65 61 64 20 22 |ompletin|g-read "|
|00005980| 57 68 69 63 68 20 73 6f | 75 72 63 65 20 63 6f 6e |Which so|urce con|
|00005990| 74 65 78 74 3f 20 22 20 | 6e 69 6c 20 74 20 65 72 |text? " |nil t er|
|000059a0| 72 6f 72 20 22 4e 6f 20 | 72 65 73 6f 6c 76 65 64 |ror "No |resolved|
|000059b0| 20 73 6f 75 72 63 65 20 | 72 65 66 65 72 65 6e 63 | source |referenc|
|000059c0| 65 73 22 5d 20 37 20 28 | 23 24 20 2e 20 32 32 36 |es"] 7 (|#$ . 226|
|000059d0| 39 33 29 20 6e 69 6c 5d | 29 0a 28 64 65 66 61 6c |93) nil]|).(defal|
|000059e0| 69 61 73 20 27 70 6f 2d | 74 61 67 73 2d 73 65 61 |ias 'po-|tags-sea|
|000059f0| 72 63 68 20 23 5b 28 72 | 65 73 74 61 72 74 29 20 |rch #[(r|estart) |
|00005a00| 22 08 83 06 00 c1 12 0b | c1 89 89 89 1c 1d 1e 06 |".......|........|
|00005a10| 1e 07 1e 08 0e 07 84 4f | 01 5c 6e 84 32 00 8a c9 |.......O|.\n.2...|
|00005a20| ca 21 88 cb cc 21 88 0e | 0d 86 2d 00 ce cf 21 29 |.!...!..|..-...!)|
|00005a30| 12 c1 16 10 d1 d2 5c 6e | 40 5c 22 88 8a 0e 10 14 |......\n|@\".....|
|00005a40| d3 5c 6e 40 21 89 16 06 | 71 88 5c 66 84 4b 00 65 |.\n@!...|q.\f.K.e|
|00005a50| 14 5c 66 62 88 c1 15 0d | 84 e7 00 d4 d5 c1 cc 23 |.\fb....|.......#|
|00005a60| 83 e7 00 68 d6 55 83 6b | 00 d7 d8 21 88 60 14 82 |...h.U.k|...!.`..|
|00005a70| 50 00 68 d9 55 83 83 00 | 67 da 55 83 7b 00 db 82 |P.h.U...|g.U.{...|
|00005a80| 7c 00 dc 75 88 60 14 82 | 50 00 8a dd 79 88 de df ||..u.`..|P...y...|
|00005a90| 21 29 83 96 00 c1 7f 88 | 60 14 82 50 00 60 53 15 |!)......|`..P.`S.|
|00005aa0| 67 e0 55 84 af 00 e1 c1 | 77 88 67 da 55 83 99 00 |g.U.....|w.g.U...|
|00005ab0| dc 75 88 82 99 00 e2 75 | 88 60 14 0d 62 88 e3 c1 |.u.....u|.`..b...|
|00005ac0| 78 88 68 e4 55 83 e1 00 | c1 1e 25 e6 e2 21 88 e3 |x.h.U...|..%..!..|
|00005ad0| c1 78 88 60 16 25 e7 c1 | 78 88 60 0e 25 7b 43 0e |.x.`.%..|x.`.%{C.|
|00005ae0| 08 9d 29 83 e1 00 c1 15 | 5c 66 62 88 82 50 00 29 |..).....|\fb..P.)|
|00005af0| 5c 66 16 10 0d 84 00 01 | 5c 6e 41 89 12 84 fa 00 |\f......|\nA.....|
|00005b00| ce e8 21 88 c1 16 10 82 | 13 00 e9 0e 06 0d 5c 66 |..!.....|......\f|
|00005b10| 23 88 8a 0e 2a 71 88 65 | 62 88 d4 eb c1 cc 23 83 |#...*q.e|b.....#.|
|00005b20| 1d 01 cc 16 07 82 4b 01 | d4 ec c1 cc 23 83 4b 01 |......K.|....#.K.|
|00005b30| ed 20 1e 2e 65 62 88 d4 | ef c1 cc 23 83 3d 01 f0 |. ..eb..|...#.=..|
|00005b40| f1 cc 89 23 88 82 2c 01 | ed 20 dc 5f 0e 2e 57 83 |...#..,.|. ._..W.|
|00005b50| 4a 01 cc 16 07 29 29 82 | 13 00 f2 cc 21 83 5b 01 |J....)).|....!.[.|
|00005b60| f3 20 88 82 5f 01 f4 e2 | 21 88 f5 0e 06 21 88 0d |. .._...|!....!..|
|00005b70| 62 88 f6 e2 21 88 f7 5c | 66 21 83 77 01 5c 66 62 |b...!..\|f!.w.\fb|
|00005b80| 88 82 7e 01 5c 66 62 88 | f6 f8 21 88 f4 e2 21 88 |..~.\fb.|..!...!.|
|00005b90| d1 f9 5c 6e 40 5c 22 88 | 0d 16 3a 5c 66 89 16 10 |..\n@\".|..:\f...|
|00005ba0| 2d 87 22 20 5b 72 65 73 | 74 61 72 74 20 6e 69 6c |-." [res|tart nil|
|00005bb0| 20 70 6f 2d 6e 65 78 74 | 2d 66 69 6c 65 2d 6c 69 | po-next|-file-li|
|00005bc0| 73 74 20 70 6f 2d 6b 65 | 79 77 6f 72 64 73 20 65 |st po-ke|ywords e|
|00005bd0| 6e 64 20 73 74 61 72 74 | 20 62 75 66 66 65 72 20 |nd start| buffer |
|00005be0| 66 6f 75 6e 64 20 6b 65 | 79 77 6f 72 64 73 20 72 |found ke|ywords r|
|00005bf0| 65 71 75 69 72 65 20 65 | 74 61 67 73 20 6e 65 78 |equire e|tags nex|
|00005c00| 74 2d 66 69 6c 65 20 74 | 20 6e 65 78 74 2d 66 69 |t-file t| next-fi|
|00005c10| 6c 65 2d 6c 69 73 74 20 | 65 72 72 6f 72 20 22 4e |le-list |error "N|
|00005c20| 6f 20 66 69 6c 65 73 20 | 74 6f 20 70 72 6f 63 65 |o files |to proce|
|00005c30| 73 73 22 20 70 6f 2d 73 | 74 72 69 6e 67 2d 65 6e |ss" po-s|tring-en|
|00005c40| 64 20 6d 65 73 73 61 67 | 65 20 22 53 63 61 6e 6e |d messag|e "Scann|
|00005c50| 69 6e 67 20 25 73 2e 2e | 2e 22 20 66 69 6e 64 2d |ing %s..|." find-|
|00005c60| 66 69 6c 65 2d 6e 6f 73 | 65 6c 65 63 74 20 72 65 |file-nos|elect re|
|00005c70| 2d 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 |-search-|forward |
|00005c80| 22 5c 5c 28 5b 5c 22 27 | 5d 5c 5c 7c 2f 5c 5c 2a |"\\([\"'|]\\|/\\*|
|00005c90| 5c 5c 29 22 20 34 32 20 | 73 65 61 72 63 68 2d 66 |\\)" 42 |search-f|
|00005ca0| 6f 72 77 61 72 64 20 22 | 2a 2f 22 20 33 39 20 39 |orward "|*/" 39 9|
|00005cb0| 32 20 33 20 32 20 30 20 | 6c 6f 6f 6b 69 6e 67 2d |2 3 2 0 |looking-|
|00005cc0| 61 74 20 22 5e 23 20 2a | 5c 5c 28 69 6e 63 6c 75 |at "^# *|\\(inclu|
|00005cd0| 64 65 5c 5c 7c 6c 69 6e | 65 5c 5c 29 22 20 33 34 |de\\|lin|e\\)" 34|
|00005ce0| 20 22 5e 5c 22 5c 5c 5c | 5c 22 20 31 20 22 20 5c | "^\"\\\|\" 1 " \|
|00005cf0| 6e 09 22 20 34 30 20 65 | 6e 64 2d 6b 65 79 77 6f |n." 40 e|nd-keywo|
|00005d00| 72 64 20 62 61 63 6b 77 | 61 72 64 2d 63 68 61 72 |rd backw|ard-char|
|00005d10| 20 22 41 2d 5a 61 2d 7a | 30 2d 39 5f 22 20 22 41 | "A-Za-z|0-9_" "A|
|00005d20| 6c 6c 20 66 69 6c 65 73 | 20 70 72 6f 63 65 73 73 |ll files| process|
|00005d30| 65 64 22 20 70 6f 2d 65 | 78 74 72 61 63 74 2d 75 |ed" po-e|xtract-u|
|00005d40| 6e 71 75 6f 74 65 64 20 | 70 6f 2d 77 6f 72 6b 2d |nquoted |po-work-|
|00005d50| 62 75 66 66 65 72 20 22 | 5b 41 2d 5a 61 2d 7a 5d |buffer "|[A-Za-z]|
|00005d60| 5b 41 2d 5a 61 2d 7a 5d | 5b 41 2d 5a 61 2d 7a 5d |[A-Za-z]|[A-Za-z]|
|00005d70| 22 20 22 5b 41 2d 5a 61 | 2d 7a 5d 5b 41 2d 5a 61 |" "[A-Za|-z][A-Za|
|00005d80| 2d 7a 5d 22 20 62 75 66 | 66 65 72 2d 73 69 7a 65 |-z]" buf|fer-size|
|00005d90| 20 74 6f 74 61 6c 20 22 | 5b 41 2d 5a 61 2d 7a 5d | total "|[A-Za-z]|
|00005da0| 2b 22 20 72 65 70 6c 61 | 63 65 2d 6d 61 74 63 68 |+" repla|ce-match|
|00005db0| 20 22 22 20 6f 6e 65 2d | 77 69 6e 64 6f 77 2d 70 | "" one-|window-p|
|00005dc0| 20 73 70 6c 69 74 2d 77 | 69 6e 64 6f 77 20 6f 74 | split-w|indow ot|
|00005dd0| 68 65 72 2d 77 69 6e 64 | 6f 77 20 73 77 69 74 63 |her-wind|ow switc|
|00005de0| 68 2d 74 6f 2d 62 75 66 | 66 65 72 20 72 65 63 65 |h-to-buf|fer rece|
|00005df0| 6e 74 65 72 20 70 6f 73 | 2d 76 69 73 69 62 6c 65 |nter pos|-visible|
|00005e00| 2d 69 6e 2d 77 69 6e 64 | 6f 77 2d 70 20 2d 31 20 |-in-wind|ow-p -1 |
|00005e10| 22 53 63 61 6e 6e 69 6e | 67 20 25 73 2e 2e 2e 64 |"Scannin|g %s...d|
|00005e20| 6f 6e 65 22 20 70 6f 2d | 73 74 72 69 6e 67 2d 73 |one" po-|string-s|
|00005e30| 74 61 72 74 5d 20 36 20 | 6e 69 6c 20 22 50 22 5d |tart] 6 |nil "P"]|
|00005e40| 29 0a 23 40 36 39 20 4d | 61 72 6b 20 6c 61 73 74 |).#@69 M|ark last|
|00005e50| 20 66 6f 75 6e 64 20 73 | 74 72 69 6e 67 20 69 6e | found s|tring in|
|00005e60| 20 43 20 73 6f 75 72 63 | 65 73 20 61 73 20 74 72 | C sourc|es as tr|
|00005e70| 61 6e 73 6c 61 74 61 62 | 6c 65 2c 20 75 73 69 6e |anslatab|le, usin|
|00005e80| 67 20 4b 45 59 57 4f 52 | 44 2e 1f 0a 28 64 65 66 |g KEYWOR|D...(def|
|00005e90| 61 6c 69 61 73 20 27 70 | 6f 2d 6d 61 72 6b 2d 66 |alias 'p|o-mark-f|
|00005ea0| 6f 75 6e 64 2d 73 74 72 | 69 6e 67 20 23 5b 28 6b |ound-str|ing #[(k|
|00005eb0| 65 79 77 6f 72 64 29 20 | 22 c0 09 40 21 5c 6e 0b |eyword) |"..@!\n.|
|00005ec0| c4 89 1d 1e 06 1e 07 1e | 08 1e 09 ca 0e 09 0e 08 |........|........|
|00005ed0| 0e 07 23 15 8a 0e 09 71 | 88 cb 65 0e 08 5c 22 16 |..#....q|..e..\".|
|00005ee0| 06 0e 07 62 88 cc 63 88 | 0e 08 62 88 0e 0d 63 88 |...b..c.|..b...c.|
|00005ef0| 0e 0d ce 98 84 44 00 cf | 63 88 0e 07 54 16 07 d0 |.....D..|c...T...|
|00005f00| 63 88 29 0e 07 0e 0d 47 | 5c 5c d1 5c 5c 89 16 07 |c.)....G|\\.\\...|
|00005f10| 13 c4 1e 12 64 62 88 d3 | d4 d5 09 40 0e 06 23 d6 |....db..|...@..#.|
|00005f20| 0d d7 c4 23 d8 b1 04 88 | d9 da 21 88 db 89 16 1c |...#....|..!.....|
|00005f30| 2e 06 87 22 20 5b 66 69 | 6e 64 2d 66 69 6c 65 2d |..." [fi|nd-file-|
|00005f40| 6e 6f 73 65 6c 65 63 74 | 20 70 6f 2d 6e 65 78 74 |noselect| po-next|
|00005f50| 2d 66 69 6c 65 2d 6c 69 | 73 74 20 70 6f 2d 73 74 |-file-li|st po-st|
|00005f60| 72 69 6e 67 2d 73 74 61 | 72 74 20 70 6f 2d 73 74 |ring-sta|rt po-st|
|00005f70| 72 69 6e 67 2d 65 6e 64 | 20 6e 69 6c 20 73 74 72 |ring-end| nil str|
|00005f80| 69 6e 67 20 6c 69 6e 65 | 20 65 6e 64 20 73 74 61 |ing line| end sta|
|00005f90| 72 74 20 62 75 66 66 65 | 72 20 70 6f 2d 65 78 74 |rt buffe|r po-ext|
|00005fa0| 72 61 63 74 2d 75 6e 71 | 75 6f 74 65 64 20 63 6f |ract-unq|uoted co|
|00005fb0| 75 6e 74 2d 6c 69 6e 65 | 73 20 22 29 22 20 6b 65 |unt-line|s ")" ke|
|00005fc0| 79 77 6f 72 64 20 22 5f | 22 20 22 20 22 20 22 28 |yword "_|" " " "(|
|00005fd0| 22 20 32 20 62 75 66 66 | 65 72 2d 72 65 61 64 2d |" 2 buff|er-read-|
|00005fe0| 6f 6e 6c 79 20 22 5c 6e | 22 20 66 6f 72 6d 61 74 |only "\n|" format|
|00005ff0| 20 22 23 3a 20 25 73 3a | 25 64 5c 6e 22 20 70 6f | "#: %s:|%d\n" po|
|00006000| 2d 65 76 61 6c 2d 72 65 | 71 75 6f 74 65 64 20 22 |-eval-re|quoted "|
|00006010| 6d 73 67 69 64 22 20 22 | 6d 73 67 73 74 72 20 5c |msgid" "|msgstr \|
|00006020| 22 5c 22 5c 6e 22 20 70 | 72 65 76 69 6f 75 73 2d |"\"\n" p|revious-|
|00006030| 6c 69 6e 65 20 31 20 74 | 20 70 6f 2d 6f 66 66 65 |line 1 t| po-offe|
|00006040| 72 2d 76 61 6c 69 64 61 | 74 69 6f 6e 5d 20 37 20 |r-valida|tion] 7 |
|00006050| 28 23 24 20 2e 20 32 34 | 31 33 35 29 5d 29 0a 28 |(#$ . 24|135)]).(|
|00006060| 64 65 66 61 6c 69 61 73 | 20 27 70 6f 2d 6d 61 72 |defalias| 'po-mar|
|00006070| 6b 2d 74 72 61 6e 73 6c | 61 74 61 62 6c 65 20 23 |k-transl|atable #|
|00006080| 5b 6e 69 6c 20 22 08 83 | 10 00 09 83 10 00 c2 c3 |[nil "..|........|
|00006090| 21 88 c4 89 10 87 c5 c6 | 21 87 22 20 5b 70 6f 2d |!.......|!." [po-|
|000060a0| 73 74 72 69 6e 67 2d 73 | 74 61 72 74 20 70 6f 2d |string-s|tart po-|
|000060b0| 73 74 72 69 6e 67 2d 65 | 6e 64 20 70 6f 2d 6d 61 |string-e|nd po-ma|
|000060c0| 72 6b 2d 66 6f 75 6e 64 | 2d 73 74 72 69 6e 67 20 |rk-found|-string |
|000060d0| 22 5f 22 20 6e 69 6c 20 | 65 72 72 6f 72 20 22 4e |"_" nil |error "N|
|000060e0| 6f 20 73 75 63 68 20 73 | 74 72 69 6e 67 22 5d 20 |o such s|tring"] |
|000060f0| 32 20 6e 69 6c 20 6e 69 | 6c 5d 29 0a 28 64 65 66 |2 nil ni|l]).(def|
|00006100| 61 6c 69 61 73 20 27 70 | 6f 2d 73 65 6c 65 63 74 |alias 'p|o-select|
|00006110| 2d 6d 61 72 6b 2d 61 6e | 64 2d 6d 61 72 6b 20 23 |-mark-an|d-mark #|
|00006120| 5b 28 61 72 67 29 20 22 | 08 83 13 00 c1 c2 21 43 |[(arg) "|......!C|
|00006130| 89 1b c4 0b 0d 5c 22 42 | 89 15 29 87 0e 06 83 40 |.....\"B|..)....@|
|00006140| 00 0e 07 83 40 00 0d 40 | 40 1e 08 c9 ca cb 0e 08 |....@..@|@.......|
|00006150| 5c 22 0d cc cd 24 89 1b | ce 98 83 36 00 0e 08 13 |\"...$..|...6....|
|00006160| cf 0b 21 88 cc 89 16 06 | 2a 87 d0 d1 21 87 22 20 |..!.....|*...!." |
|00006170| 5b 61 72 67 20 72 65 61 | 64 2d 66 72 6f 6d 2d 6d |[arg rea|d-from-m|
|00006180| 69 6e 69 62 75 66 66 65 | 72 20 22 4b 65 79 77 6f |inibuffe|r "Keywo|
|00006190| 72 64 3a 20 22 20 6b 65 | 79 77 6f 72 64 20 64 65 |rd: " ke|yword de|
|000061a0| 6c 65 74 65 20 70 6f 2d | 6b 65 79 77 6f 72 64 73 |lete po-|keywords|
|000061b0| 20 70 6f 2d 73 74 72 69 | 6e 67 2d 73 74 61 72 74 | po-stri|ng-start|
|000061c0| 20 70 6f 2d 73 74 72 69 | 6e 67 2d 65 6e 64 20 64 | po-stri|ng-end d|
|000061d0| 65 66 61 75 6c 74 20 63 | 6f 6d 70 6c 65 74 69 6e |efault c|ompletin|
|000061e0| 67 2d 72 65 61 64 20 66 | 6f 72 6d 61 74 20 22 4d |g-read f|ormat "M|
|000061f0| 61 72 6b 20 77 69 74 68 | 20 6b 65 79 77 6f 61 72 |ark with| keywoar|
|00006200| 64 3f 20 5b 25 73 5d 20 | 22 20 6e 69 6c 20 74 20 |d? [%s] |" nil t |
|00006210| 22 22 20 70 6f 2d 6d 61 | 72 6b 2d 66 6f 75 6e 64 |"" po-ma|rk-found|
|00006220| 2d 73 74 72 69 6e 67 20 | 65 72 72 6f 72 20 22 4e |-string |error "N|
|00006230| 6f 20 73 75 63 68 20 73 | 74 72 69 6e 67 22 5d 20 |o such s|tring"] |
|00006240| 36 20 6e 69 6c 20 22 50 | 22 5d 29 0a 23 40 33 37 |6 nil "P|"]).#@37|
|00006250| 20 50 72 6f 76 69 64 65 | 20 61 6e 20 68 65 6c 70 | Provide| an help|
|00006260| 20 77 69 6e 64 6f 77 20 | 66 6f 72 20 50 4f 20 6d | window |for PO m|
|00006270| 6f 64 65 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |ode...(d|efalias |
|00006280| 27 70 6f 2d 68 65 6c 70 | 20 23 5b 6e 69 6c 20 22 |'po-help| #[nil "|
|00006290| c0 20 88 c1 8b 88 c2 0b | 21 87 22 20 5b 70 6f 2d |. ......|!." [po-|
|000062a0| 63 68 65 63 6b 2d 6c 6f | 63 6b 20 28 28 62 79 74 |check-lo|ck ((byt|
|000062b0| 65 2d 63 6f 64 65 20 22 | c0 09 21 88 c2 20 88 0b |e-code "|..!.. ..|
|000062c0| 63 88 c4 20 88 65 62 88 | c5 c6 21 88 c7 20 87 22 |c.. .eb.|..!.. ."|
|000062d0| 20 5b 73 77 69 74 63 68 | 2d 74 6f 2d 62 75 66 66 | [switch|-to-buff|
|000062e0| 65 72 20 70 6f 2d 77 6f | 72 6b 2d 62 75 66 66 65 |er po-wo|rk-buffe|
|000062f0| 72 20 65 72 61 73 65 2d | 62 75 66 66 65 72 20 70 |r erase-|buffer p|
|00006300| 6f 2d 68 65 6c 70 2d 64 | 69 73 70 6c 61 79 2d 73 |o-help-d|isplay-s|
|00006310| 74 72 69 6e 67 20 64 65 | 6c 65 74 65 2d 6f 74 68 |tring de|lete-oth|
|00006320| 65 72 2d 77 69 6e 64 6f | 77 73 20 6d 65 73 73 61 |er-windo|ws messa|
|00006330| 67 65 20 22 54 79 70 65 | 20 61 6e 79 20 63 68 61 |ge "Type| any cha|
|00006340| 72 61 63 74 65 72 20 74 | 6f 20 63 6f 6e 74 69 6e |racter t|o contin|
|00006350| 75 65 22 20 72 65 61 64 | 2d 63 68 61 72 5d 20 32 |ue" read|-char] 2|
|00006360| 29 29 20 62 75 72 79 2d | 62 75 66 66 65 72 20 70 |)) bury-|buffer p|
|00006370| 6f 2d 77 6f 72 6b 2d 62 | 75 66 66 65 72 5d 20 32 |o-work-b|uffer] 2|
|00006380| 20 28 23 24 20 2e 20 32 | 35 31 36 39 29 20 6e 69 | (#$ . 2|5169) ni|
|00006390| 6c 5d 29 0a 23 40 33 38 | 20 55 6e 64 6f 20 74 68 |l]).#@38| Undo th|
|000063a0| 65 20 6c 61 73 74 20 63 | 68 61 6e 67 65 20 74 6f |e last c|hange to|
|000063b0| 20 74 68 65 20 50 4f 20 | 66 69 6c 65 2e 1f 0a 28 | the PO |file...(|
|000063c0| 64 65 66 61 6c 69 61 73 | 20 27 70 6f 2d 75 6e 64 |defalias| 'po-und|
|000063d0| 6f 20 23 5b 6e 69 6c 20 | 22 c0 19 c2 20 88 c3 89 |o #[nil |"... ...|
|000063e0| 14 29 87 22 20 5b 6e 69 | 6c 20 62 75 66 66 65 72 |.)." [ni|l buffer|
|000063f0| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 75 6e 64 6f 20 |-read-on|ly undo |
+--------+-------------------------+-------------------------+--------+--------+